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SECTION 1 
INTRODUCTION 



1.1 THE REALITY CPU 

The Reality CPU, althouth physically small in size, has the 
architecture of a medium scale computer. Its main memory is 
core, and is expandable from 8,192 bytes to 65,536 bytes in 
increments of 8,192 bytes. Its full cycle operation is 1 
microsecond per byte. 

The virtual memory is disc which is oriented into 512-byte 
frames, expandable from 4,871 frames (2.5 million bytes) to 
12,192,320 frames (6.4 billion bytes). This is the virtual 
memory addressing range of the CPU itself. However, in stand- 
ard configurations, the Reality Computer System is configured 
from 5 million bytes to 80 million bytes of disc storage. The 
CPU is capable of handling a large number of asynchronous pro- 
cesses, each associated with an input/output device. The 
Reality CPU will support in excess of 32 terminals (or asyn- 
chronous processes) . 

The CPU has 16 addressing registers and one extended accumula- 
tor for each terminal. A variable return stack accommodating 
up to 31 recursive subroutine calls for each terminal is also 
provided; however, current software convention allows only 11 
entries in the stack. By indirect addressing through any one 
of the 16 registers, any byte in the virtual memory can be 
accessed. Relative addressing is also possible using an off- 
set displacement plus one of the 16 registers to any bit, byte, 
word (16 bits)., double word (32 bits), or triple word (48 bits) 
in the entire virtual memory. 



1.2 THE REALITY INSTRUCTION SET 

The Reality Computer System has an extensive instruction set. 
The main features include: 

• Bit, byte, word, double-word, and triple-word opera- 
tions . 

• Memory-to-memory operation using relative addressing on 
bytes, words, double-words, and triple-words. 

• Bit operations permitting the setting, resetting, and 
branching on condition of a specific bit. 

• Branch instructions which permit the comparison of two 
relative memory operands and branching as a result of 
the compare. 
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Addressing register operations for incrementing, decre- 
menting, saving, and restoring addressing registers. 

Byte string operations for the moving of arbitrarily 
long byte strings from one place to another. 

Operations for the conversion of binary numbers to print 
able ASCII characters and vice versa. 

Arithmetic instructions for loading, storing, adding, 
subtracting, multiplying, and dividing the extended 
accumulator and a memory operand. 

Control instructions for branching, subroutine calls, 
and program linkage. 



1.3 MANUAL ORGANIZATION AND CONVENTIONS 
This manual is organized as follows: 

• Section 2 is essentially a "reference manual" for the 
Reality CPU. It describes the system structure and the 
machine instructions. 

• Section 3 describes the Reality Assembly Language (REAL) . 

• Section 4 describes the Interactive Debugger (DEBUG) , 
which may be used to monitor and control program execu- 
tion . 

t Section 5 describes the Reality System Software, which 
may be used to facilitate assembly level programming. 

In presenting general command formats throughout this manual, 
the following conventions apply. 

Convention Meaning 

UPPER CASE Characters or words printed in upper case are 

required and must appear exactly as shown. 

lower case Characters or words printed in lower case are 

parameters to be supplied by the user (e.g., file 
name, item-id, data, etc.). 

{} Braces surrounding a word and/or parameter indi- 

cate that the word and/or parameter is optional 
and may be included or omitted at the user's option 

{}... If an elipses (i.e., three dots) follows the ter- 

minating bracket, then the enclosed word and/or 
parameter may be omitted or repeated an arbitrary 
number of times. 
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In presenting examples, the following conventions apply 



Convention 

TEXT 

TEXT 



Meaning 

Shaded text represents the user's input. 

Standard text represents output printed by the 
system . 

This symbol represents a carriage return. 

This symbol represents a line feed. 
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SECTION 2 
REALITY CPU REFERENCE INFORMATION 



This section is a "reference manual for the Microdata Reality CPU. It 
provides a description of the system structure; of the arithmetic, logical, 
branching, skipping, and input/output operations; and of the interrupt 
and storage management system. Input/output devices are discussed in a 
separate document. 



2.1 SYSTEM STRUCTURE 

The Reality system consists of a core storage unit, a disc storage device 
used as a virtual storage unit, a central processing unit (CPU), and from 
one to 64 input/output terminals. There is a one-to-one correspondence 
between a terminal attached to the system and a process. Additionally, 
input/output devices such as magnetic tape units, disc units, card 
readers, and printers may be attached to the system. Input/output devices, 
other than the process terminal, may be accessed by any process. It 
should be noted that the disc unit containing the virtual store cannot be 
accessed as an input/output unit, except by the monitor. 



2.1.1 INFORMATION FORMATS 

The system transmits information between the CPU and core storage (and 
between core storage and virtual storage) in units of 8 bits, or in 
multiples of 8 bits at a time. Each 8 bit unit is called a byte. 

Information may be a single byte, or may be grouped together in fields. 
Fields of two, four, and six bytes are called words, double words, and 
triple words, respec Lively. A field made up of an arbitrary number of 
bytes is called a string. The location of any field is specified by the 
address of the left most byte of the field. Addresses increase from 
left to right. 

Within any information format, the bits making up the format are 
numbered from left to right, starting with 0. The figure below shows 
the information formats: 

BYTE 

1100011 o| 
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WORD 



11110001 


0100101l| 



DOUBLE WORD 



11100000 


10001111 


00000000 


10101011 



1 1 

5 6 



2 2 

3 4 



TRIPLE WORD 



00000001 


00100111 


00111111 


11110000 


00001001 


00000111 



1 1 

5 6 



2 2 

3 4 



3 3 
1 2 



3 4 
9 



2.1.2 ADDRESSING 

Byte locations in main storage are consecutively numbered starting with 
zero. Each number is the address of a byte. A group of bytes is 
addressed by the leftmost byte of the group. The number of bytes in a 
group is either implied or explicitly defined by the operation,. The 
addressing mechanism uses a 16-bit binary address giving a maximum of 
65,536 addressable bytes. Main storage is available from 8,192 bytes to 
65,536 bytes in 8,192 byte increments. Main storage is partitioned into 
blocks of 512 bytes each. A main storage block is called a buffer. 

Virtual storage is also partitioned into blocks of 512 bytes each. A 
block of virtual storage is called a frame. Frames are numbered con- 
secutively starting with zero. Each number is the address of a frame. 
A frame address is also called a frame identification (FID). FID's are 
24 bit binary numbers giving an addressing capacity of 16,777,216 frames 
or 8,589,934,592 bytes. Virtual storage is available in 9,744 frame 
(4,988,928 byte) increments. 

All program references to information are references to virtual storage. 
Fields in virtual storage are referenced via a frame number and a 
displacement. If the field being referenced is a single byte or a string, 
the displacement is the number of bytes relative to the first data byte 
of the frame. If the reference is to a word, double word or triple word, 
the displacement is the number of words relative to the first data byte 
of the frame. References to instructions are via a 12-bit frame number. 
Therefore, programs must be located in the first 4,096 frames. 
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2.2 



VIRTUAL MEMORY MANAGEMENT 



The CPU directly accesses information from buffers in main storage. 
These buffers contain the contents of virtual storage frames. The 
virtual frames are moved between the disc and main storage as required 
by processes in progress. Two of the main storage buffers, and Z, 
contain the monitor program that performs the actual operation of 
swapping frames in and out of main storage. Main storage buffers 
1 and 3 contain information about each of the main storage buffers 
and a map of the frames currently contained in each main storage 
buffer. 



2.2.1 BUFFER STATUS 

Main storage locations X'200 f through X ? 27F' contain the status of 
each of the main storage buffers. One byte is used for the status of 
each buffer. Location X'200' contains the status of buffer 0; loca- 
tion X'201' contains the status of buffer 1; and so forth. The 
information contained in the buffer status byte is given below: 



Buffer Status Byte 


Bit 







I/O BUSY/ 


1 


C0REL0CK1/ 


2 


C0REL0CK/ 


3 


WRTREQD/ 


4 




5 




6 




7 




PSYM Name 


Bit 


I/O BUSY/ 


Z 



Description 



Zeroed whenever an I/O (disc or peripheral) 
is in progress for this buffer;; set when I/O 
completes. Firmware prevents "attachment" by 
a virtual process to a buffer with this bit 
zero. 



C0REL0CK1./ 



This bit is zeroed during cold-start tape 
generation, along with bit 2, if a buffer is 
to remain core-locked. 
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PSYM Name Bit Description 



CORELOCK/ 2 A zero indicates that this buffer may not be 

selected for disc input. 

WRTREQD/ 3 A zero indicates that data in this buffer has 

changed since it has been read from disc, and 
must therefore be written back to disc. 

4 Unused 

5-7 These bits are used by the 'FAR' instruction 
which changes the buffer status. 



2.2.2 BUFFER MAP 

Main storage locations X'280' through X ? 2FF' and locations X'700 1 
through X'7FF' contain the addresses of the frames currently in the 
main storage buffers. The map is divided into two sections. Loca- 
tions X'280 1 through X'2FF' contain the least significant byte of 
each of the frame addresses. Locations X'700' through X'7FF' contain 
the most significant two bytes of each of the frame addresses. For 
example, the virtual storage address of the frame in buffer 4 is 
found by concatenating the contents of main storage bytes X'708 1 , 
X'709\ and X f 204' . 



2.2.3 BUFFER QUEUE 

A buffer queue is maintained by the firmware in main storage locations 
X'300' through X'3FF'. The buffer queue consists of a doubly linked 
list of buffer numbers ordered according to their time of attachment 
by the firmware. Each time a register is attached to a buffer, the 
firmware moves the attached buffer to the head of the buffer queue. 

When the contents of a buffer must be replaced because of a frame 
fault, the buffer queue is used to identify the least recently 
attached buffer for replacement. The buffer used is then moved to 
the head of the buffer queue. 

Each entry in the buffer queue consists of two bytes. The word (two 
bytes) displacement of the entry from main storage location X'300' 
corresponds to the buffer number. The two bytes forming each entry 
in the buffer queue are the two pointers forming the doubly linked 
list. 

The first byte of each entry points to the next more recently attached 
buffer entry in the queue. The second byte of each entry points to 
the next less recently attached buffer entry. The first byte of the 
most recently attached entry (i.e., head of the queue) contains X'FF'. 
The second byte of the least recently attached entry (i.e., tail of 
the queue) contains zero. 
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Bytes at locations X'300' and X'301' contain pointers to the head and 
tail of the buffer queue respectively. The head of the queue identi- 
fies the most recently attached buffer number. The tail of the queue 
identifies the least recently attached buffer number. 



2.3 PROCESS 

The Reality CPU is designed as an interactive system capable of com- 
municating with several users simultaneously. A user communicates 
with the system via a communication terminal such as a Teletype or 
CRT terminal. Associated with each terminal is a process. A process 
is not an element of the system but rather a continuing operation on 
a set of functional elements. Refer to Section 2.8 
for peripheral I/O details. 



2.3.1 PROCESS IDENTIFICATION BLOCK 

For each process attached to the system, there is a Process Identifi- 
cation BLOCK (PIB). Each PIB is 32 bytes long. The PIB for terminal 
zero is in main storage locations X'800' through X'81F'; locations 
X'820' through X'83F' contain the PIB for terminal one; and so forth. 
The PIB contains information about the status of the process with 
which it is associated. The following is a description of the PIB 
contents. Bytes through 6 are determined by firmware. 



PIB Status Bytes 

Byte 


1 
2 
3 
4 
5 
6 
7 



9 
10 
11 

12 
13 
14 
15 





















PIB-IOQ 


Charge-units 
counter 




PCBFID 




PIBFID 







Bit 


ACTIVE 







1 


DIOBLK/ 


2 


PIBEND/ 


3 


DWAIT/ 


4 


OBYTEBLK/ 


5 


IBYTEBLX/ 


6 


CIOBLK/ 


7 






DWRITE 





CIOOUT 


1 


L0PRI0BIT 


2 


DELAY 


3 


ERROR 
CODE 


4 
5 
6 
7 
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PIB Status Bytes 



Name 



Byte Bits 



Meaning 



ACTIVE 



DIOBLK/ 



PIBEND/ 

DWAIT/ 

OBYTEBLK/ 

IBYTEBLK/ 

CIOBLK/ 



DWRITE 



CIOOUT 



LOPRIOBIT 1 



DELAY 



One indicates that process may be activated 
(candidate for Select Next User process). 

1 Unused 

2 Zero (zeroed by firmware on a frame fault) 
indicates that process is roadblocked waiting 
for referenced frame to be input from virtual 
storage. Set to one when monitor accepts 
request by moving FID onto IOQ. 

3 Zero indicates the end of the PIBs. 

4 Zeroed by monitor when frame fault request is 
accepted (FID moved to IOQ) . Set to one when 
disc transfer is complete. 

5 Zeroed by firmware when process is roadblocked 
waiting for terminal to complete output. Set 
to one when output is complete. 

6 Zeroed by firmware when process is roadblocked 
waiting for terminal to complete input. Set 
to one when input is complete. 

7 Zeroed by monitor when process is roadblocked 
waiting for concurrent I/O block transfer to 
complete. Set to one when block transfer is 
complete. 

One indicates read request is roadblocked 
waiting for buffer to be written out to disc. 
Zeroed when output is complete and read request 
has been replaced in IOQ. 

1 One indicates process is roadblocked waiting 
for concurrent output to complete. Zeroed 
when output is complete. 

2 Set to one on a Release Quantum entry to 
monitor, if the process does not have either a 
byte input or byte output roadblock. Also set 
to one during concurrent block output. 

3 One indicates a one-cycle delay to the Select 
Next User process, on a Release Quantum entry 
to monitor. 
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Name Byte Bits 
ERROR CODE 1 4-7 



Meaning 



0-7 

0-7 

0-7 
0-7 



Software generated error trap codes: 

08 - illegal FID 

09 - disc error 

0C - register zero detached 

0E - charge-units counter overflow 

Last byte address of PIB I/O buffer (bytes 
16-31 of PIB). 

Number of bytes in PIB I/O buffer less one 
(X'FF 1 = no bytes). 

Mask byte used by Communications controller. 

"Unusual status" of Communications Control- 
ler line associated with this PIB. 



PIB— IOQ 



0-7 Data byte received from Communications 

controller line associated with this PIB. 

0-7 Pointer connecting PIB to IOQ entry. 



Charge-units 8-9 0-15 
counter 



PCBFID 



PIBFID 



10-11 0-15 



12-15 0-31 



12 


0-7 


13 


0-7 


14 


0-7 



15 



16-31 



0-7 



Number of charge-units associated with 
this process. 

Frame-id of the Primary Control Block (PCB) 
for this process. 

When a process is roadblocked because of a 
frame fault, the frame-id is placed in these 
bytes. When the monitor is entered as a 
result of a call operation, these bytes 
contain parameters : 



Frame I/O Request 



Monitor Call 



Buffer number which High-order address of 
contains PCB. PCB frame 



High-order byte 
of absent FID. 

Middle byte of 
absent FID. 



Low-order byte 
of absent FID. 



Mask byte from Call 
instruction. 

High-order byte of 
address of register 
referenced in Call. 

Low-order byte of 
address of register 
referenced in Call. 



Input/output buffer for the terminal associ- 
ated with this process. 
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2.3.2 PRIMARY CONTROL BLOCK 

For each process there is a frame called the Primary Control Block 
(PCB) . The PCB contains the accumulator, address registers, subrou- 
tine return stack and string scan control characters associated with 
the process. The location of the PCB is contained in the PIB of the 
process. The following paragraphs describe the contents of the PCB. 
The bytes that are not described are not accessed by the. Firmware. 
However, the remaining bytes of the PCB contain information used by 
the operating system. 



Bytes Description 

This byte is reserved for a lock code used for 

storage protection. 

1 This byte contains the condition code resulting 

from a previous arithmetic instruction execution. 

3-5 These bytes are used for controlling the Move and 

Scan through Delimiter instructions. 

6-7 These bytes are used for controlling the debug 

trace mode of operation. 

8-X'OB' These bytes contain the double word accumulator 

extension. The accumulator extension contains 
the most significant portion of a product after 
a multiply operation. It contains the remainder 
after a divide operation. 

X'OC'-X'OF' These bytes contain the double word accumulator. 

X'lOO'-X 1 17F' These bytes contain the 16 address registers. 

See the description of the address registers 
below. 

X' ISO'-X'ISl' These bytes contain the address (relative to 

byte zero of the PCB) of the limit of the sub- 
routine stack. 

X'182 l -X'183' These bytes contain the pointer to the current 

top of the subroutine stack. 

X'184 1 and above The bytes contain the subroutine return stack. 

The number of bytes allocated for the stack is 
determined by the contents of bytes X'180 1 and 
X f 181\ 
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Address Registers 

All references to data, except immediate data, are made indirectly 
through an address register. There are 16 address registers in each 
PCB. Each address register contains 8 bytes: 



Address 

Register 

Format 



ADDRESS 


DISPLACEMENT 


LINK 


FID 



Bytes 
0-1 

2-3 



Description 



These bytes contain the 16 bit main storage address of the 
referenced data. If the address is less than X'800', the 
frame containing the data may be absent from main storage. 

These bytes contain the displacement of the referenced data 
relative to the first data byte of the frame. The displace- 
ment is a 16-bit signed number. Negative values are 
represented in two's complement form. These bytes are 
meaningful only when the register is detached. (See 
Register Attachment below.) 

Zero in bit zero of this byte indicates that the register 
references data in the linked format. If bit zero is a 
one, the register references the data in the unlinked 
format. 

One in bit one indicates that frame attachment is in 
progress. Bit one can only be set during the execution 
of instructions that increment addresses with data 
movement . 



5-7 These bytes contain the virtual storage frame number of 
the byte being referenced. 



Address Register Attachment 

When a program loads ("restores") an address register, the first two 
bytes of the register are set to zero. Bytes 2 through 7 of the 
address contain a virtual frame number and displacement. A register 
in this format is said to be detached. When a subsequent instruction 
uses the detached register for a data reference, an attempt is made 
to convert the address register to the attached format. The attach- 
ing attempt is automatic and performed as follows. The buffer map 
is scanned to determine if the referenced frame is located in main 
storage. If the frame is in main storage, the location of the 
required byte is computed by adding the buffer address from the map 
to the displacement from the address register. The address is then 
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REALITY 2.0 UPDATE 



placed into bytes and 1 of the address register, thus forming the 
attached format. Once the register is attached, instruction execution 
takes place. 

If the referenced frame is not in main storage, the frame number is 
placed into bytes 12 through 15 of the PIB. Byte 0, bit 2 of the 
PIB is set to 0, thus roadblocking the process. Next all of the 
address registers in the PCB are converted to detached format and a 
fault interrupt to the monitor is taken. 



Address Register Zero 

Register zero is used in a special way. This register always contains 
the FID of the PCB. Register zero is attached when the process is 
activated. The displacement field of this register is always assumed 
to be zero. 



Address Register One 

When a process is not active, address register one contains the FID and 
displacement (minus one) for the next instruction to be executed. When the 
process is activated, the buffer address of the program frame (as 
determined from the buffer map) is added to the displacement from 
register one. This value is placed into a hardware instruction 
counter. The register is then converted to the attached form with 
the buffer address set to the base address (byte zero) of the program 
frame. When the process is deactivated, the main storage location 
from the instruction counter is converted to the corresponding FID 
and displacement and the register is detached with these values placed 
into it. 



2.3.3 FRAME FORMATS 

The Reality system recognizes two types of frame formats; linked and 
unlinked. In b3th formats byte zero of the frame is reserved for a 
frame lock. 

Unlinked frames contain 511 data bytes. For unlinked frames the 
displacement portion of an address is relative to byte of the frame, 
i.e., a displacement of 1 is a reference to the first data byte. 
Displacements outside the range through 511 are not valid for frames 
in the unlinked format. 

Linked frames contain 500 data bytes. For linked frames, the dis- 
placement field in the address is relative to byte 11 of a frame. 
However, a displacement of zero is a reference to byte 511 of the 
frame to the left of the current frame. Displacements for linked 
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frames may be positive or negative so long as the displacement 
references a logically linked item of data. The following paragraphs 
describe the linked format. 







8 



10 



11 



12... 



FRAME 
LOCK 


NNCF 


FRMN 

(Next FID) 
> 


FRMP 
(Previous FID) 


NPCF 


Unused 


Data 
Section 
(500 bytes) 



Linked Frame Format 



Bytes 



Description 



This byte is reserved for a frame lock. 

This byte contains a count of the number of next contiguous 
frames to the right of this frame (NNCF) . A zero in this 
byte indicates that this frame is the rightmost frame in 
a contiguously linked set of frames. 



2-5 This field contains the frame number of the frame that is 
logically to the right of this frame. If byte 1 contains 
other than zero, the frame to the right is the next 
higher numbered frame. If byte 1 contains a zero the 
frame to the right may be any frame number. A zero in 
this field indicates that this is the rightmost frame of 
a linked set. 

6-9 This field is similar to bytes 2 through 5 except that it 
contains the number of the frame to the left of this frame 
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This byte is similar to byte 1 except that it contains a 
count of the number of previous contiguous frames to the 
left of this frame (NPCF) . 



11 Unused. 



12-511 Data section. 



2.4 THF. MONITOR 

The monitor is a program that is an integral part of the Reality 
system. The monitor process is the only one not associated with a 
PIB. The PCB for the monitor is defined as buffer of main storage. 

The function of the monitor is to initiate the transmission of informa- 
tion between main storage buffers and virtual storage and to schedule 
each of the processes. 
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When the system is operating in monitor mode, address registers are 
not checked for attachment. Instead all data references are assumed 
by the firmware to be references to absolute core addresses. The 
system is in monitor mode whenever the location of the PCB is at 
core-address zero. 

The monitor gives control to another process by executing either a 
Resume Virtual Process or a Start Virtual Process instruction. 

The multi-disc monitor may be used with one or two drives per control- 
ler, and with one through four disc controllers. In any multi-disc 
configuration, the capacity of every drive in the system must be the 
same; i.e. , either 5 megabyte or 10 megabytes /drive; also all 
controllers must have the same number of drives attached to them. 



2.4.1 MONITOR PCB 

The PCB associated with the monitor is at absolute core-address 
through X'IFF'. Beside the functional elements that are described 
in Section 2.3.2, the following locations are used: 



Bytes Description 



Contains the Interrupt Address code on an External 
interrupt fault trap to the monitor. 



3 Contains monitor status flags (bits) . 

6 Contains the hardware clock counter; a fault is 

generated when this is incremented (every one 
millisecond) to zero. 

7 Extension of clock counter used by the monitor. 
X'lO'-X'lF' Exclusively a hardware save area. 

X'20 f -X' FF f Contains the bootstrap software executable code. 

X'lAO'-X'lAl' Contains the system date (days since 31 Dec 1967). 

X I 1AA'-X'1A7' Contains the system time (seconds since midnight). 

X 1 ICO '-X 1 IDF' Contains PIB pointers for peripheral devices 

through 15. 

X' 1E0' -X'IFF 1 Contains address pointers for peripheral devices 

through 15. 
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Initial Condition of Monitor PCB Registers 

LOC 
100 RO 
108 Rl 
110 R2 
118 R3 

120 R4 
128 R5 
130 R6 

138 R7 

140 R8 

148 R9 

150 R10 

158 Rll 

160 R12 

168 R13 

170 R14 

178 R15 
180 

: Unused or scratch 
* : Preset by MSETUP Program. 



00 00 


1 
03 05 


1 1 1 
BITS 


04 00 


01 CO 


01 


EO 


02 


7F 


06 00 


14 80 


10 


FO 


OC 


84 


0C 00 


FF FF 


20 


AO 


28 


3F 


PIBWA 


PIBSTART 
07 EO 


PIBSIZE 
00 20 


PFID 


01 


F6 


FE 64 


06 3F 


01 60 


— 


00 


01 


51 81 


IOQWAL 
06 


IOQ START 
* 


IOQSIZE 
10 


IOQMAX 
* 


IOMAX 


IPQ// 
00 


NUMCONT 
* 


DCTWAL 
06 





04 


FIDMAX 
* 


00 0B 


=H24 
OC 18 


02 00 




— 


— 


— 


OE 


— 


— 


— 


— 


— 


— 


— 


— 


__ 


— 


— 


— 


— 


— 


— 


A0 


...,_ 


84 


FF FF FF FF 
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Monitor Register Assignment 



Register 


PSYM 




No. 


Name 
None 


Address 





X'0000 1 


1 


None 


X'0400 f 


2 


None 


X'0600' 


3 


None 


X'OCOO' 


4 


PIB 


Variable 


5 


None 


X'0100' 


6 


None 


X'0160 1 


7 


IOQ 


X'06xx' 


8 


DCT 


X'06xx' 


9 


None 


X'OOOB 1 


10 


None 


— 


11 


None 


X'OEOO' 


12-15 


None 


__ 



Description of Usage 



Addresses Monitor PCB. 

Addresses MMONITOR. 

Addresses MMONITORX. 

Addresses MMONITORY/Nx. 

Current PIB pointer. 

Addresses Monitor PCB, lower half. 

Addresses WA of R12. 

Current IOQ entry pointer. 

Current DCT entry pointer. 

Addresses H4 in Monitor accumulator, 

Scratch 

Addresses MMONITORZ. 

Scratch 



2.4.2 INTERRUPTS AND MONITOR CALLS 

Once a virtual process gains control, it remains in control until the 
occurrence of an interrupt or until the process executes a Monitor 
Call instruction. The occurrence of a Monitor Call instruction will 
cause all registers in the current PCB to be converted to the detached 
form. 

There are three types of interrupts to the monitor; external, internal, 
and fault. 



An external inter 
storage device) c 
(excluding the vi 
process is saved 
be resumed by exe 
occurrence of an 
inhibited until a 
the monitor. Ref 
explanation of ex 
Device addresses 
and X'10' - X'17 1 



rupt is generated when a device (including the virtual 
Dmpletes an operation. When an external interrupt 
rtual storage device) occurs, the status of the active 
in the hardware. The process that was interrupted must 
cuting a Resume Virtual Process instruction. After the 
external interrupt, further external interrupts will be 

Resume Virtual Process instruction has been executed by 
er to Section 2.4.4 for an 

ternal interrupts from the Virtual Storage Device. 
0-X'F' are assumed to be non-virtual storage devices 

are assumed to be virtual storage devices. 
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When an internal interrupt occurs with a dependent process active, all 
registers in the PCB are converted to detached form and control passes 
to the monitor. An internal interrupt can be recognized with the 
monitor active at any time except in the case of a real time clock runout 
which can only be recognized after the execution of a Test Interrupt instruc- 
tion (X'01"). 

A fault interrupt can occur only when a virtual process is active. A 
fault interrupt causes all the registers in the PCB to be converted to 
detached form. 

The monitor must execute a Start Virtual Process instruction to start 
a process that was interrupted by an internal or fault interrupt. 

Interrupts cause entry to the monitor at predefined locations. The 
table below shows the monitor entry point for each interrupt condition. 



Entry Address 
1 
3 
5 



11 
13 



Interrupt Condition 

Reference to absent frame (fault) 

Input/output operation complete (external) 

Power fail console interrupt, or clock 
runout (internal) 

Terminal input/output with device not 
ready, or attempt to attach a buffer 
with input or output active in the buffer 
(fault) 

Attempt to attach register when not in 
the monitor (fault) 

Power restored entry point (internal) 

Hardware abnormal condition while in 
Monitor mode 



15 
17 thru 31 



Not used 

Monitor Call instruction entry points 



Traps 

Certain operations can cause a trap condition to be signaled. The 
occurrence of a trap causes a Branch and Stack location instruction 
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to be executed to a predefined location in virtual storage frame one, 
The table below shows the entry point and the cause for each trap. 



Entry 
Address 



Cause 



Illegal operation code encountered. 

The return stack is empty. This occurs when a 
Return instruction is executed with the current 
stack position pointing to the beginning of the 
return stack. 



The return stack is full. This occurs when a stack 
location type of operation is executed and the 
current stack position is equal to the end of stack 
location. The current stack location is reset. 



11 



Attempt to reference frame when not in monitor 
mode. The number of the address register that 
contained the reference is placed into the condition 
code byte of the PCB. 

Attempt to cross a frame boundary for an unlinked 
frame or a word, double word, or triple word not 
entirely in one frame. The register number con- 
taining the reference is placed into the condition 
code byte of the PCB. 

Attempt to link across a frame with a forward link 
of zero. The register number containing the refer- 
ence is placed into the condition code byte of 
the PCB. 



13 



15 



Attempt to link across a frame with a backward link 
of zero. The register number containing the reference 
is placed into the condition code of the PCB. 

Attempt to execute a privileged opcode when not in 
monitor mode. 



17 
19 
21 
23 



31 



Attempt to reference a non-existent frame. 

Disc error. 

Break key activated on the terminal. 

Return stack format error. There are two conditions 
that cause this error. Either the end of stack 
location is less than the current stack position, or 
the stack size is defined for less than 7 entries. 

Debug trace mode. This is not an error condition. 
Trace mode is controlled by bytes 6 and 7 of the PCB. 
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Trace Mode 

The Reality CPU can operate in a special mode called trace mode. When 
trace mode is in effect the hardware monitors the instruction execution 
and traps to location 31 of frame 1 on the occurrence of certain condi- 
tions. When a trap occurs, bits through 3 of byte 6 of the PCB are 
set to zero, inhibiting further traps. The conditions that can cause 
the trap are defined in bytes 6 and 7 of the PCB. The following 
list shows the conditions: 

Byte 6, Bit 1 - This bit indicates that a trace interrupt is to 
occur on every BSL, ENT, BSL*, or ENT* instruction (modal trace). 

Byte 6, Bit 3 - This bit indicates that trace traps can occur 
on every instruction. 

Byte 6, Bit 5 - This bit is set by firmware when an instruction 
trace trap has occurred. 

Byte 6, Bit 6 - This bit is set by firmware when a RTN trace trap 
has occurred. 

Byte 6, Bit 7 - This bit is set by firmware when a BSL, ENT, 
ENT* or BSL* trace trap has occurred. 

Byte 7 - When the system is in the instruction trace mode, 
this byte is incremented for every instruction executed. 
A trace trap will not occur until this byte has been 
incremented to zero. 



2.4.3 MONITOR DTSf SCHEDULING TABLES 

There are two tables that control the disc I/O scheduling: the I/O 
Queue (IOQ) and the Device Control Table (DCT). The IOQ table may be 
considered a subset of the Process Identification Block set (PIB) ; a 
process that requires disc input must first be allotted a spot in the 
IOQ before its request can be honored. Since the IOQ can be set to 
any size between two and eight entries, the IOQ acts as a funnel 
between the disc input requests from the processes, and the actual 
disc I/O. By preventing the honoring of requests for too many 
processes in rotation, the IOQ serves to control "thrashing". 



The I/O Queue (IOQ) 

Moving on and off the IOQ is controlled by the monitor in the following 
manner: When a process requests disc input, and it is not on the IOQ, 
it is moved on to an available IOQ entry if such an entry exists at 
the time; if not, the process goes into a wait state until an entry 
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becomes available. A process moves off the IOQ ("deactivates") under 
the following conditions: 

1) The process executes a "Release Quantum", either explicitly 
(via the RQM instruction) or implicitly due to: 

• Real Time Clock Interrupt 

• Terminal input or output roadblock 

• Concurrent I/O block transfer roadblock 

2) The process executes the maximum number of disc input 
requests, as specified by the monitor parameter IOMAX. 

In any of the above cases, that process is taken off the IOQ; the 
entire PIB table is then searched for other processes that are road- 
blocked due to a disc input request, and one of them selected to be 
moved to the ICQ, at which time the disc input request counter 
(IOCTR) is set to the initial value specified in IOMAX. 

IOQ Table Format 






1 


2 


3 4 


5 


6 


7 


8 


9 


A 


B 


c 


D 


E 


F 






CO 




























u 


CO 




1-4 














0) 


01 
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T) 
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•H 
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u 


< 


£i 
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fe 


a 


4-1 


O 


03 aj 


Ol 




03 


o 


4-1 




•H 


3 


O 


•H 4-i 


U-l 




•H 


•H 


p 




00 


Pu 


05 


H C/3 


U-4 




M 


4J 


03 




o 


c 


CO 


03 


3 






03 


a 


4-4 


1 , 






.J 


M 


< 


> 


« 






> 


< 


CO 


1 






. 



Byte PSYM Name : 
None 



Description 



Logical unit number; consists of the controller 
device address, with the high-order bit specifyinj 
the drive number : 



Controller Address - 
Drive Number 



14 15 



14 
94 



15 
95 



16 



16 
96 



17 



17 
97 
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Byte PSYM Name 



Description 



None 
(Continued) 



1 IOCTR 



2-3 IOQ— PIB 

4 I0QC0M1 

5 IOQBUF 



6-7 IOQDA 

8 None 

9 IOQACT 



This byte is set up when the disc address is 
computed from the FID; is set to zero when the disc 
request has been processed. 

Disc input request counter; is set to value speci- 
fied in IOMAX when a process is moved to the IOQ; 
is decremented on every input request processed. 

If zero specifies an available IOQ entry. 

Link from IOQ to PIB; is set up when a process is 
moved to the IOQ; is never zeroed. 

Scratch location used to communicate with the disc 
controller may store a RETURN command, a SELECT 
and QUEUE SEEK command, or the major status. 

Buffer address, (upper) to which disc I/O is 
being done; the low-order bit is first zeroed to 
output the "buffer start, upper" command, to 
the disc controller, then set to output the 
"buffer end, upper" command. 

Disc address computed from the FID. 

Used as a scratch location to output the "buffer 
start, lower" and "buffer end, lower" bytes 
(always X'OO' and X'FF 1 respectively). 

Controller action code: 



X'OO 1 
X'01 1 
X'02' 



Read 

Verify 

Write 



A None 



B 



C IOQFIDO 
D-F IOQFID 



Controller command — always X'90' (start queued 
seek(s), arm interrupt). 

Unused 

FID, uppermost byte is always X f 80". 



2-19 



Selection of a Process to be placed on the IQQ 

The following rules are used to select a process to be placed on the 
IOQ (if more than one process is roadblocked due to a disc input 
request) : 

1) If the process had been taken off the IOQ due to a 
terminal I/O roadblock, it is selected to be placed 
on the IOQ immediately. This is governed by bit 
LOPRIOBIT being zero in the PIB. 

2) If none of the processes are so roadblocked, the 
first process with LOPRIOBIT set (therefore lower 
priority) is selected to be placed on the IOQ. 

The effect of this selection criterion is that processes that had 
moved off the IOQ due to terminal I/O will have a higher priority 
than processes that do not do any I/O. In order that the latter type 
of processes do not get into a state where they may never be selected 
due to the existence of other processes that are in a heavy terminal 
I/O state, LOPRIOBIT is zeroed during the search described above. 

Note that in the event that only one process requires disc input, a 
full search of the PIB table is completed, before the deactivated 
process is moved back to the IOQ. 



IOQ Setup 

When a process is placed on the IOQ due to a disc input request, the 
following sequence of events occurs: 

1) The disc input roadblock (DIOBLK/) in the PIB status 
is sat, thereby indicating that this process is on the 
IOQ, and is no longer a candidate for IOQ selection. 

2) The "waiting for disc" flag (DWAIT/) is zeroed, thereby 
preventing the Select Next User routine from selecting 
that process for execution. 

3) The requested FID is moved from the PIB to the IOQ, and 
the disc address is computed. 

4) a) If the addressed disc is busy, nothing further can 

be done . 

b) If not, the 'SETUP' routine in the disc interrupt 
handler is entered. 
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Disc Address Computation 

Subroutine SETIOQ takes the FID specified in the IOQ entry; checks 
against a maximum FID as specified in the literal FIDMAX; converts 
the FID to a 16-bit disc address and stores the latter at IOQDA. 



Disc Address Format 






1 


2 


3 


4 


5 


6 


7 


8 


9 


10 


11 


12 


13 


14 


15 


p 


c 


c 


c 


c 


c 


c 


c 


c 


c 


h 


s 


s 


s 


s 






PLATTER //-^ 



CYLINDER # — 
0-202 (5MB Disc) 
0-405 (10MB Disc) 



HEAD// 







SECTOR // 

0-22; even values only 



The Device Con tro l Table (DCT) 

The DCT entry is uniquely associated with a disc drive; it contains a 
flag indicating whether the device is busy or not, a link to the IOQ 
associated with the drive, and in the case of two drives per control- 
ler, a seek counter which keeps track of the number of seeks that 
have been started on the controller. 

The DCT location is mapped directly from the device address of the 
controller, and the disk drive number; its main function is to pro- 
vide an easy linkage from the interrupt address supplied by the CPU 
at the time of an interrupt, to the IOQ. 



DCT Table Entry (Per Controller) 
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Byte PSYM Name Description 



1 None Minor status from drive if an error has occurn 
is not reset if no errors. 



DCTBSY 



High-order bit, if set, indicates drive is busy. 
Reset on I/O completion. 



DCT — IOQ Address link from DCT to associated IOQ Entry; 
is setup when seek is started; is not reset. 



2.4.4 DISC INTERRUPT HANDLING 

On receiving an end-of-transfer interrupt, the firmware deactivates 
the currently executing virtual process (if in virtual mode) , and 
traps to location X'403 f in the monitor. The interrupt address of 
interrupting device (device address times two) is stored at X'OF 1 - 
the low-order byte of the monitor accumulator. A virtual process 
cannot resume execution after completion of disc interrupt handling, 
since its buffers may be replaced and attached registers may no longer 
be valid. 

The interrupt address is mapped into the DCT address, which leads to 
the associated IOQ address, which in turn leads to the associated 
buffer address, FID, and PIB address. The status of the drive is 
obtained and, if there are no errors, the controller is re-armed 
(if another seek is pending it is also re-started). If the completed 
operation was a write, a verify is now started, and interrupt handling 
terminates. 



Selection an d setup of next I/O 

Since the drive is now ready, the IOQ table is searched for a matching 
device/drive number, or logical unit number. If a match is found, 
the setup phase is entered (also entered from frame fault) . 

1) The FID is picked up from the IOQ, and a FAR instruction 
executed; this is the only monitor-level instruction 
that causes the firmware to attach an A/R. If the 
requested FID is core-resident, the disc read roadblock 
is removed from the associated PIB, and the IOQ table 
searched for the next I/O. 

2) If the FID is not core-resident, the execution of the FAR 
instruction has automatically caused an attachment to the 
"oldest" buffer in core. If this is core-locked, the FAR 
is repeated. If not, and if the buffer has no write- 
required flag on its status, an available spot has been 
found for the disc read, and the read parameters are set up 
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3) If a write- required flag exists on the buffer status, that 
data must be written out before the read request can be 
processed; therefore, the IOQ entry is overwritten with 
the FID to be written out, and the write parameters are 
set up in the IOQ. Also, the flag DWRITE in the PIB status 
is set, indicating that the read request from the process 
is yet to be processed. Note that in this case a drive 
other than the one that just completed a transfer may be 
started. 



Starting I/ O 

In the case of two drives per controller, a RETURN instruction is 
issued to the controller if another seek is pending completion 
(DSCSEEKS non-zero) ; if the controller status indicates that it did 
not return, the start I/O sequence is aborted, and the associated 
process arbitrarily reactivated by clearing its PIB roadblocks. This 
is because the controller either: 

• is transferring data at this time, in which case it 
cannot be interrupted to queue another seek, or 

• it has completed a transfer, in which case an interrupt 
is pending recognition and another seek cannot be queued. 

When reading a frame, the buffer FID is set to zero till the read 
completes; when writing a frame to the disc, the FID of the buffer 
remains unchanged. In either case, the buffer status is set core- 
locked and I/O busy for the duration of the I/O. 



Disc Errors 



If a disc error is detected at the completion of the transfer, the 
minor status from the drive is stored in the DCT; the buffer is set 
non-core-locked, not-l/O-busy , the associated process PIB roadblock 
is cleared just as if the I/O had completed, and error //9 is set in 
the PIB error byte. This causes a virtual software trap to the DEBUG 
State, and an eventual re-stacking of the request. Note that the 
buffer FID is maintained if the transfer was a write, and is left as 
zero if the transfer was a read. 

If an illegal FID is requested (as determined by comparing against 
FIDMAX in the monitor PCB) , as above, except that error #8 is flagged, 
The DEBUGGER will abort the process in this case. 



The Select Next Us er (SNU) Routine 

The Select Next User routine (SNU) is entered whenever the monitor 
has completed setting up a disc transfer; has completed processing 
of a disc interrupt; or is in a "wait" state due to all virtual 
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processes being quiescent. While the monitor is in the SNU routine, 
it cycles through the PIB's to see if any of the processes require 
activation. At this time also, the monitor executes the Test Interrupt 
instruction, which is the only monitor-executed instruction that 
allows recognition of external interrupts. 

A process may be selected under the following conditions: 

• All roadblocks clear; that is, if DIOBLK/, DWAIT/, 
OBYTEBLK/, IBYTEBLK/ , CIOBLK/ are set, and DELAY 
and DWRITE are zero. 

• External activation and disc roadblocks clear; that 
is, if ACTIVE, CIOBLK/ and DWAIT/ are set. This 
would happen if the process received a BREAK-key 
interrupt, or if another process sent this one a 
message via the MESSAGE processor. 

In either case, the monitor sets up to activate the process by 
loading the PCB-FID from the PIB into R4FID (of the monitor), and 
executing a Start Virtual Process instruction. 

If the process had been roadblocked due to a disc input request, and 
the monitor had overwritten this request with a disc write, all status 
bits are as in (1) above, except that DWRITE is set. In this case, 
the monitor will cause the read request to be re-stacked, by 
re-entering the Frame Fault entry point. 



Programming Notes 

The current IOQ entry is addressed by the address register "IOQ" 
(R7); the current DCT entry by the A/R "DCT" (R8) ; in the case of 
two discs per controller, R12 addresses byte zero of the DCT block 
for the current controller. 

Registers DCT and IOQ always work in the same 256-byte block (X'600 - 
X' 6FF 1 ); therefore, the upper bytes of their address words are preset 
to X ! 06 r (as an initial condition when cold-starting the system), and 
only their low order address bytes are altered. Also, the IOQ table 
starting address pointer (IOQSTART) is a half-tally. 

The DCT location is from X'640' through X'67F' (see formats later); 
sixteen bytes are allocated to each of four possible controllers, 
(with device addresses X'14 ! through X'17 1 respectively), with one or 
two drives per controller. 

The IOQ table has a fixed ending address — the last entry is X'6F0' 
through X'6FF'; the starting address is variable, depending on the 
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number of entries allowable. The table beginning pointer (IOQSTART) 
is 16 bytes before the first IOQ entry: 

IOQSTAR:T=X ! 700' - 16» (IOQMAX+1) 

where IOQMAX is in the range 2 through 8 inclusive. 

2.5 MACHINE INSTRUCTIONS 

This section lists all Reality machine instructions and describes their 

execution. A diagram representing the format is given with each 

instruction description. Preceding the diagram is the name of the 

instruction. Enclosed in parentheses is the assembler code for 

the instruction. It should be noted that the assembler codes are 

not unique. That is, several of the instructions have the same code. 

The assembler uses both the code and the operand attributes to 

determine a particular operation (see Section 3). Below is an example 

of an instruction description: 

Branch Byte Equal to Immediate (BCE) 



0100 


Ra 


K 




10 


S 



10 



The numerical operation code bits are shown as binary numbers. Note 
that the operation code need not occupy consecutive bit positions of 
an instruction. In the example above the operation code occupies the 
first and fifth fields of the instruction. The numbers appearing 
beneath the diagram indicate the number of bit positions occupied by 
the particular field. The symbols appearing in the diagram indicate 
the type of information in the field. Shading indicates that the 
field is not used in the instruction. The table below defines the 
symbols used in the instruction diagrams: 



Symbol 
R 
D 



Meaning 



FID 



The field contains an address register number. 

The field contains a displacement relative to 
the contents of an address register or relative 
to the beginning of a frame. 

The field contains a frame identification number 
If the field is less than 24 bits wide, high 
order zeroes are assumed. 

The field contains a signed magnitude skip 
distance (in bytes) for conditional skipping. 
A skip distance of zero means no bytes are to 
be skipped. 
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Symbol Meaning 

L The field contains an operand length. L = is a 
1 byte operand. L = 1 is a 2 byte operand. 
L = 2 is a 4 byte operand. L = 3 is a 6 byte 
operand. 

K The contents of the field itself is an operand. 

Terms used in the instruction descriptions are defined as 
follows : 

• Ra or Rb means the contents of the addressing register named by the Ra 
or Rb field of an instruction. 

t C(Ra) or C(Rb) means the contents of the location referenced by the 
address contained in the named addressing register. 

• C(Ra,Ea) or C(Rb,Db) means the contents of the storage frame location 
referenced by adding the D field of the instruction to the contents 
of the named storage register. 

• When a. register or part of a register is cleared, the cleared part 
contains zero bits. 

• When the word 'load' is used in a description it means the contents 
of some frame location replaces the contents of a special register 
(address register or accumulator) . 

• When the word 'store' is used in a description it means the contents 
of a special register or the contents of an instruction field replaces 
the contents of some frame location. 

• When the word 'move' is used in a description it means that the con- 
tents of a frame location replaces the contents of another frame 
location, or the contents of a register replaces another register. 



Storage operands are always referenced through one of the 16 address- 
ing registers. An addressing register contains the byte address of 
the operand. For instructions with a D field, a displacement is 
added to form an effective address. When the operand is a single byte 
(L field = 0), the D field of the instruction is the displacement. 
When the operand is a word, double word or triple word (L = 1, 2 or 3) 
the D field is doubled to form the displacement. 
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2.5.1 ARITHMETIC OPERATIONS 

The following operations perform arithmetic on binary integers. 
Negative values are represented in two's complement form. The 'L' 
field of the instruction specifies the length of the operand in 
storage. For storage to accumulator operations, triple word operands 
are not allowed (L field of 3) ; byte and word operands are sign 
extended to form a double word value before the operation is performed 
The accumulator operand is always a double word. Storage operands 
must lie entirely in a single frame. The condition codes resulting 
from an arithmetic operation are placed in byte 1 of the PCB. The 
condition codes are defined below. 



Symbolic Name 
ZROBIT 
NEG'BIT 
OVFBIT 



Bit Position 
5 
6 
7 



Condition Indicated 
zero result 
negative result 
arithmetic overflow 



Test and Set Arithmetic Condition Flags (TST) 



1010 


Ra 


Da 


L 


000010 



The contents of (Ra,Da) is tested and the arithmetic condition flags 
(i.e., ZROBIT and NEGBIT) are updated appropriately. The instruction 
may be used with a half tally, a tally, or a double tally. L is '00', 
'01', or '10' respectively depending upon the type of operand. 



Add to Accumulator (ADD) 



1010 


Ra 


Da 


L 


010011 



8 



The C(Ra,Da) are added algebraically to the accumulator, 
placed in the accumulator. The C(Ra,Da) are unchanged. 



The sum is 



Add to Storage (INC) 



1111 


Ra 


Da 


L 


10 


Rb 


Db 



8 



The C(rb,Db) are added algebraically to the C(Ra,Da) 
placed in the C(Ra,Da). The C(Rb,Db) are unchanged. 



The sum is 
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Add a One to Storage (INC) 



1010 


Ra 


Da 


L 


000011 



4 4 8 2 6 
The C(Ra,Da) are algebraically increased by 1 

Subtract from Accumulator (SUB) 



1010 


Ra 


Da 


L 


010101 



The C(Ra,Da) are algebraically subtracted from the accumulator. The 
difference is placed into the accumulator. The C(Ra,Da) are not 
changed . 



Subtract from Storage (DEC) 



1111 


Ra 


Da 


L 


11 


Rb 


Db 



The C(Rb,Db) are algebraically subtracted from the C(Ra,Da). The 
difference replaces the C(Ra,Da). The C(Rb,Db) are not changed. 



Subtract One from Storage (DEC) 



■■■"'— "" 1' " 

1010 Ra 


Da 


L 


000101 



4 4 8 2 6 
The C(Ra,Da) are algebraically decreased by 1 

Multiply (MUL) 



1010 


Ra 


Da 


L 


010000 



2-28 



The contents of the accumulator are multiplied by the C(Ra,Da). A 64 bit 
product replaces the contents of the accumulator and accumulator extension, 
The sign of the product is determined by the rules of algebra. The 
C(Ra,Da) are not changed. 



Divide (DIV) 



1010 


Ra 


Da 


L 


010001 



The sign of the accumulator is replicated into the accumulator extension 
to form a 64 bit dividend. The C(Ra,Da) are divided into the dividend 
to form a 32 bit quotient and a 32 bit remainder. The quotient replaces 
the contents of the accumulator and the remainder replaces the contents 
of the accumulator extension. The sign of the quotient is determined by 
the rules of algebra. The sign of the remainder is the sign of the 
dividend. The C(Ra,Da) are not changed. 

Negate (NEG) 



1010 


Ra 


Da 


L 


001000 



4 4 8 2 6 
The sign of the C(Ra,Da) is changed. 

2.5.2 DATA TRANSMISSION OPERATIONS 

The following operations are concerned with the transmission of data 
between storage locations, between registers, and between registers and 
storage locations. 

For instructions in this group, operands in storage must be within a 

single frame. 

Exchange Address Registers (XRR) 



00010111 


Ra 


Rb 



8 4 4 
Ra and Rb are exchanged. 

Move Address Register to Address Register (MOV) 



00010110 


Ra Rb 



8 4 4 
Ra replaces Rb. Ra is not changed. 
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Load Accumulator (LOAD) 



1010 


Ra 


Dc. 


L 


011000 



The C(Ra,Da) replace the contents of the accumulator. The C(Ra,Da) are 
not changed. The accumulator is sign extended to form a double word 
value. 



Store Accumulator (STORE) 



1010 


Ra 


Da 


L 


011001 



The contents of the accumulator replaces the C(Ra,Da) 
the accumulator is not changed. 



The contents of 



Store a Zero (ZERO) 



1010 


Ra 


Da 


L 


000000 





4 4 8 2 6 
The C(Ra,Da) are replaced with zeros 

Store a One (ONE) 



1010 


Ra 


Da 


L 


000001 



4 4 8 2 6 
The C(Ra,Da) are replaced with a 1, 

Move (MOV) 



1111 


Ra 


Da 


L 


00 


Rb 


Db 



4 4 8 2 2 4 8 
The C(Rb,Db) replace the C(Ra,Da). The C(Rb,Db) are not changed. 

Store Address Register (MOV) 



1110 


Ra 


Da 


1101 


Rb 



4 



& 



The detached form of Rb is stored into the C(Ra,Da). A triple word is 
stored. Rb is not changed. Da is doubled to form the effective address 
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Load Address Register (MOV) 



1110 


Ra 


■ ■■■ ■■■- 1 
Da 


1110 


Rb 



8 



8 



The C(Ra,Da) replace the 6 low order bytes (displacement and FID) of 
Rb. The high order byte of Rb (buffer location) is set to zero. The 
C(Ra,Da) are not changed. Da is doubled to form the effective address, 



Move Immediate Character (MCC) 



0100 


Ra 


K 


0010 


ii iV "mi 



4 4 8 4 4 
The byte, K, replaces the C(Ra). 

Increment and Move Immediate Character (MCI) 



0100 


Ra 


K 


0100 


^■■^M'^S^: 



4 4 8 4 4 
Ra is incremented by 1 and then the byte, K, replaces the C(Ra). 



Exch 


ange Characters 


(XCC) 








0100 


Ra 


Rb 


0111 



4 4 4 4 
The single byte in C(Ra) is exchanged with the single byte in C(Rb) . 

Move Character (MCC) 



0110 


Ra | Rb 


1001 



The single byte in C(Rb) replaces the byte in C(Ra). 
changed. 



The C(Rb) are not 



Move Character to Relative Character (MCC) 



1101 


Ra 


Da 


0000 


Rb 



The single byte at the C(Rb) replaces the byte at the C(Ra,Da). 
C(Rb) are not changed. 



The 
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Move Relative Character to Character (MCC) 



1101 


Ra 


Da 


0001 


Rb 



The single byte at the C(Ra,Da) replaces the byte at the C(Rb). 
C(Ra,Da) are not changed. 



The 



Increment Source Register and Move Character (MIC) 



0110 


Ra 


Rb 


0001 



Ra is incremented by 1 and then the single byte in C(Ra) replaces the 
C(Rb). The C(Ra) are not changed. 



Increment Destination Register and Move Character (MCI) 



0110 


Raj Rb 


1010 



Ra is incremented by 1 and then the single byte at C(Rb) replaces the 
C(Ra). The C(Rb) are not changed. 



I n c r ement Both Registers and Move Character (Mil) 



0110 


Ra Rb 


0010 



Ra and Rb are each incremented by 1 and then the single byte at C(Ra) 
replaces the C(Rb). The C(Ra) are not changed. 



2.5.3 ADDRESS MODIFICATION OPERATIONS 

The following group of instructions are used to modify the displace- 
ment portion of an addressing register. 



Load Absolute Address Difference (LAD) 



1.110 


Ra 


Da 


1100 


Rb 



This operation treats the triple word in the C(Ra,Da) as a storage 
address. The absolute value of the difference between this address and 
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Clio address in Rb is computed. The result is a two byte integer, 
result replaces the contents of the low-order accumulator., 



The 



NOTE: 



This instruction is valid for unlinked frames only if the frame 
number in C(Ra,Da) is the same as the frame number in Rb . The 
instruction is valid for unequal frame numbers only if both frames 
are in the same group of contiguously linked frames and the 
difference between the frame numbers is less than 32. 



Increment Address Register (INC) 



0011 


Ra 



4 



4 



Attachment is forced on Ra and the word address portion of Ra is incre- 
mented by one. If the resulting word address is not in the same buffer, then 
either: 

• A crossing frame limits error occurs if Ra is in unlinked 
format, or 

• An attempt is made to attach Ra to the first data byte of the 
frame pointed to by the forward link of the current frame. In 
this case, forward link zero and illegal frame id are errors 
which can be detected if they occur. 



Add to Address Register (INC) 



1110 

I, 


Ra Da 

... . li 


0101 


Rb 



4 



4 



The two byte integer at the C(Ra,Da) is added to the displacement portion 
of Rb. The C(Ra,Da) are not changed. The Da field is doubled to form 
the effective address. 



Decrement Address Register (DEC) 



0010 



Ra 



Attachment is forced on Ra and the word address portion of Ra is 
decremented by one. If Ra is in the unlinked format no error detection 
is performed. In the linked format, if the resulting word address is 
XYOB*: 

• If the backward link of the current frame is zero, Ra remains 
attached to data byte zero of the current frame. 

• Otherwise, an attempt is made to attach Ra to the last data 
byte of the frame pointed to by the backward link of the current 
frame. Illegal frame id is an error which can be detected in 
this case. 



In the linked format, if the resulting word address is XYOA*, a backward 
link zero error is detected. 



* XY represents any even hex number(0 < XY <_ FE). 
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Subtract from Address Register (DEC) 



1110 


Ra 


Da 


0100 


Rb 



4 4 8 4 4 

The 16 bit integer at* the C(Ra,Da) is subtracted from the address portion 
of Rb. The C(Ra,I)a) are not changed. The Da field is doubled to form 
the effective address. 

Load Effective Address (SRA) 



1110 


Ra 


Da 


L 


11 


Rb 



4 4 8 2 2 4 

An effective address is computed using the contents of Ra and the Da 
field. The Da field is doubled if the L field is not zero. The resulting 
effective address replaces Rb. Ra is not changed. 



2.5.4 BIT MANIPULATING OPERATIONS 
The following two instructions are used to manipulate individual bits 



Set Bit On (SB) 



1000 


Ra 


Da 



4 



4 



Da is a bit displacement relative to the byte address in Ra. The most 
significant bit of the byte has a bit number of zero. The least signifi- 
cant bit of the addressed byte has a displacement of seven. The bit in 
the C(Ra,Da) is set to 1. 



Set Bit Off (ZB) 



0111 


Ra 


Da 



4 



8 



Da is a bit displacement relative to the byte address in Ra. The most 
significant bit cf the byte has a bit number of zero. The least signifi- 
cant bit of the addressed byte has a displacement of seven. The bit: in 
the C(Ra,Da) is set to 0. 



2.5.5 CONTROL OPERATIONS 

Instructions that govern the flow of a program, and in particular cause 
an alteration of the process of taking instructions from sequential loca- 
tions, are callec control instructions. 

Branch instructions specify the frame and word displacement relative to 
the start of the frame from which the computer is to take the next 
instruction. 
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Skip instructions specify the number of bytes to be skipped in order to 
reach the next instruction. The skip amount is relative to the first 
byte of the instruction following the skip instruction. The skip amount 
is a 10 bit field represented in sign magnitude form. For skip instruc- 
tions, a skip out of the current frame causes a fault trap to location 9 
of frame 16. 



No Operation (NOP) 



00000000 



8 

This instruction causes the computer to take the next instruction in 
sequence. 



External Branch (ENT) 



00010000 


D 


FID 



4 



12 



This instruction causes the computer to take its next instruction from 
the location specified by the FID and D fields. The D field is doubled 
to determine the branch location relative to byte 1 of the frame. Only 
the first 16 words of a frame can be specified as branch locations. The 
first 16 words of a procedure frame normally contain entry vectors. 



External Branch Indirect (ENTI) 



00010010 



8 

This instruction is similar to the Branch instruction except that the D 
and FID fields are contained in the two low order bytes of the 
accumulator. 



Branch and Stack Location (BSL) 



00010001 


D 


FID 



4 



12 



The location following this instruction is stacked in the return stack. 
The next instruction is taken from the location specified by the FID and 
D fields. The D field is doubled to determine the location relative to 
byte 1 of the frame. The location is stored as a two byte FID and a 
two byte displacement. 
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;ranch and Stack Location Indirect (BSLI) 



00010011 



This instruction is similar to Branch and Stack Location except that: the 
D and FID fields are contained in the two low order bytes of the accumu- 
lator. The location is stored as a two byte FID and a two byte 
displacement. 



Return (RTN) 



00010100 



The address stored in the top of the return stack replaces the instruction 
counter and the return stack is popped. This causes the next instruction 
executed to be the one following the most recently executed Br£inch and 
Stack instruction. 



Branch (B) 



000111 


s | 



6 10 
The number of bytes specified by S are skipped. 

Branch and Stack Location (BSL) 



000110 



6 10 

The location following this instruction is stacked in the return stack, 
Then the number of bytes specified by S are skipped. The location is 
stored as a two byte zero field and a two byte displacement. 



Branch Character Not Equal (BCU) 



0101 


Ra 


Rb 


00 


S 



4 



4 



10 



If the byte at the C(Ra) is not equal to the byte at the C(Rb), the 
number of bytes specified by S are skipped. 
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Branch Character Less Than (BCL) 



0101 


Ra 


Rb 


01 


S 



4 4 4 2 10 

The byte at C(Rb) is subtracted, using 2 T s complement arithmetic, from 

the byte at C(Ra) in an internal 8-bit register. If the high order bit 

of the result is set, the number of bytes specified by S are skipped. 



Branch Character Equal (BCE) 



0101 


Ra 


Rb 


10 


S 



4 



10 



If the byte at the C(Ra) is equal to the byte at the C(Rb), the number of 
bytes specified by S are skipped. 



Branch Character Less Than or Equal (BCLE) 



0101 


Ra 


Rb 


11 


S 



4 4 4 2 10 
The byte at C(Rb) is subtracted, using 2's complement arithmetic, from 
the byte at C(Ra) in an internal 8-bit register. If the result is zero 
or if the high order bit is set, the number of bytes specified by S 
are skipped. 

Branch Character Not Equal to Immediate (BCU) 



0100 


Ra 


K 


000000 


S 



4 



10 



If the byte, K, is not equal to the byte at the C(Ra), the number of bytes 
specified by S are skipped. 



Branch Character Less Than Immediate (BCL) 



0100 


Ra 


K 


000001 


S 



4 



4 



10 



The byte at C (Ra) is subtracted, using 2's complement arithmetic, from 
the byte K in an. internal 8-bit register. If the high order bit of the 
result is set, the number of bytes specified by S are skipped. 
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iranch Character Equal to Immediate (BCE) 



0100 


Ra 


K 


000010 


s 



4 4 8 6 10 

If the byte, K, is equal to the byte at the C(Ra), the number of bytes 
specified by S are skipped. 



Branch Character Less Than or Equal to Immediate (BCLE ) 



0100 


Ra 


K 


000011 


S 



4 4 8 6 10 

The byte at C(Ra) is subtracted, using 2 f s complement arithmetic, from 
the byte K in an internal 8-bit register. If the result is zero or if 
the high order bit is set, the number of bytes specified by S are skipped 



Branch Relative Character Not Equal (BCU) 



1011 


Ra 


Da 


Rb 


00 


S 



4 



8 



4 2 



10 



If the byte at the C(Ra,Da) is not equal to the byte at the C{Rb), the 
number of bytes specified by S are skipped. 



Branch Relative Character Less Than (BCL) 



1011 


Ra 


Da 


Rb 


01 


S 



10 



The byte at C(Rb) is subtracted, using 2 T s complement arithmetic, from 
the byte at C(Ra, Da) in an internal 8-bit register. If the high order 
bit of the result is set, the number of bytes specified by S are skipped, 



Branch Relative Character Equal (BCE) 



1011 


Ra 


Da 


Rb 


10 


S 



4 



10 



If the byte at the C(Ra,Da) is equal to the byte at the C(Rb), the 
number of bytes specified by S are skipped. 
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Branch Relative Character Less Than or Equal (BCLE) 



1011 


Ra 


Da 


Rb 


11 


S 



4 4 8 4 2 10 

The byte at C(Rb) is subtracted, using 2's complement arithmetic, from 
the byte at C(Ra, Da) in an internal 8-bit register. If the result is 
zero or if the high order bit is set, the number of bytes specified by S 
are skipped. 

Compare and Branch Not Equal (BU) 



1111 


Ra 


• Da 


L 


01 


Ra 


Db 


010100 


S 



4 



8 



10 



If the C(Ra,Da) are not equal to the C(Rb,Db), the number of bytes 
specified by S are skipped. 



Compare and Branch Less Than (BL) 



1111 


Ra 


Da 


L 


01 


Rb 


Db 


010101 


S 



44 8 2248 6 10 

The value at C(Rb, Db) is subtracted, using 2's complement arithmetic, 

from the byte at C(Ra, Da) in an internal register. If the high order 
bit of the result is set, the number of bytes specified by S are skipped 

The OVFBIT will be set if overflow occurs on the subtraction; otherwise, 

OVFBIT will be reset. If OVFBIT is set, the condition of the branch 
should be reversed. 



Compare and Branch Equal (BE) 



1111 



Ra 



Da 



01 



Rb 



Db 



010110 



4 



10 



If the C(Ra,Da) are equal to the C(Rb,Db), the number of bytes specified 
by S are skipped. 



Compare and Branch Less Than or Equal (BLE) 



1111 Ra 



Da 



L 01 Rb 



Db 



010111 



2 2 



10 



The value at C (Rb , Db) is subtracted, using 2's complement arithmetic, 
from the byte at C(Ra, Da) in an internal register. If the result is 
zero or if the high order bit is set, the number of bytes specified by S 
are skipped. The OVFBIT will be set if overflow occurs on the subtrac- 
tion; otherwise, OVFBIT will be reset. If OVFBIT is set, the condition 
of the branch should be reversed. 
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Subtract and Branch Not Equal (BDNZ) 



1111 


Ra 


Da 


L 


01 


Rb 


Db 


011100 


S 



2 2 



10 



The C(Rb,Db) are subtracted from the C(Ra,Da). The difference replaces 

the C(Ra,Da). If the original C(Ra,Da) are not equal to the C(Rb,Db), 
the number of bytes specified by S are skipped. The condition codes 
are set. 



Subtract and Branch Less Than or Equal (BDLEZ) 



1111 


Ra 


Da 


LJ01 


Rb 


Db 


011111 





2 2 



10 



The C(Rb,Db) are subtracted from the C(Ra,Da). The difference replaces 
the C(Ra,Da). If the original C(Ra,Da) are less than or equal to the 
C(Ra,Da) the number of bytes specified by S are skipped. The condition 
codes are set. 



Subtract and Branch Less Than (BDLZ) 



1111 Ra 



Da 



L 01 Rb 





Db 



011101 



4 



A 



2 2 



10 



The C(Rb,Db) are subtracted from the C(Ra,Da). The difference replaces 
the C(Ra,Da). If the original C(Ra,Da) are less than the C(Rb,Db), the 
number of bytes specified by S are skipped. The condition codes are set 



Subtract and Branch Equal (BDZ) 



1111 


Ra 


Da 


L 


01 


Rb 


Db 


011110 


S 



2 2 



10 



The C(Rb,Db) are subtracted from the C(Ra,Da). The difference replaces 
the C(Ra,Da). If the original C(Ra,Da) are equal to the C(Rb,Db), the 
number of bytes specified by S are skipped. The condition codes are set 
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Branch Address Equal (BE) 



1100 Ra 



Da 



Rb 10 



8 



10 



The 6 byte (C(Ra,Da) are compared with the address of Rb . If the 
values are equal, the number of bytes specified by S are skipped. It 
is possible for two addresses to compare not equal even though they 
represent .the same storage location. This can occur if the FID in the 
C(Ra,Da) is not the same as the FID in Rb . See Note under LAD 
instruction. 



Branch Address Not Equal (BU) 



1100 


Ra 


Da 


Rb 


00 


S 



8 



10 



The 6 byte C(Ra,Da) are compared with the address of Rb . If the 
values are not equal, the number of bytes specified by S are skipped. 
It is possible for two addresses to compare not equal even though they 
represent the same storage location. This can occur if the FID in the 
C(Ra,Da) is not the same as the FID in Rb . See Note under LAD 
instruction. 



Branch Bit Set (BBS) 



1001 


Ra 


Da 




00 


■ 
S 



8 



10 



Da is a bit displacement relative to the byte address in Ra. The most 
significant bit of the addressed byte has a displacement of zero. The 
least significant bit of the addressed byte has a displacement of 
seven. If the bit in the C(Ra,Da) is on (bit = 1), the number of 
bytes specified by S are skipped. 



Branch Bit Zero (BBZ) 



8 



1001 


Ra 


Da 




10 


S 



10 



Da is a bit displacement relative to the byte address in Ra. The most 
significant bit of the addressed byte has a displacement of zero. The 
least significant bit of the addressed byte has a displacement of 
seven. If the bit in the C(Ra,Da) is off (bit = 0), the number of 
bytes specified by S are skipped. 
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2.5.6 LOGICAL OPERATIONS 

The following group of instructions perform logical operations between 
a byte in storage and an immediate operand. The logical operations 
are AND, OR (sometimes called "inclusive or") and XOR ("exclusive or"). 

When two bytes are combined by an AND, they are matched bit for nit. 

If the same bit position in each byte contains a 1, the result i.j a 1. 

If a position of either byte (or both bytes) contains a 0, the result 
is 0. 

The following is an example of a logical AND operation: 

10110001 
00110110 
00110000 resulting AND 

When two bytes are combined by an OR they are matched bit for bit. If 
the same bit position in each byte contains a 0, the result is a 0. If 
a position of either byte (or both bytes) contain a 1, the result, is 
a 1. The following is an example of logical OR: 

11011000 
0QQ100Q1 
11011001 resulting OR 

When two bytes are combined by an XOR they are matched bit for bit. If 
the corresponding bit positions in each byte are the same (both or 
both 1) the result is 0. If the same bit position in each byte is 
not the same (either contains a 1 while the other contains a 0) the 
result is 1. 

The following is an example of a logical XOR operation. 

10011100 
00011011 



10000111 resulting XOR 



AND Character (AND) 



0100 


Ra 


K 


1100 





The byte in the C(Ra) and K are logically AND'ed. 
the C(Ra) . 



The result rep Laces 
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OR Character (OR) 



0100 


Ra 


K 


1101 


'■'■V-V-ViTiiVi 



8 



The byte in the C(Ra) and K are logically OR'ed. 
the C(Ra) . 



The result replaces 



Exclusive OR Character (XOR) 



0100 


Ra 


K 


1110 





The byte in the C(Ra) and K are logically exclusive OR'ed. 
replaces the C(Ra). 



The result 



2.5.7 SHIFT OPERATION 

The following instruction allows a byte to be shifted one bit to the 
right. 



Shift Character Right (SHIFT) 



0100 1 Ra 


K 


1111 


: : ' :::; . ; .; : ; : .vi 



K is shifted right one bit position. A zero bit is inserted on the 
left and the bit shifted off the right is lost. The result replaces 
the C(Ra). The value K in the instruction does not change. 



2.5.8 STRING OPERATIONS 

The following instructions operate on strings. A string is a logically 
contiguous group of bytes. Strings may extend across frame boundaries 
provided that the frames are linked. 



Increment and Move String Under Count Control (MIIT) 



0110 


Ra 


Rb 

■ 


0100 



The contents of the lower half of the accumulator (TO) is read into 
internal hardware registers. Ra and Rb are each incremented by one 
and then the byte at c(Ra) replaces the byte at c(Rb). Next the 
Internal hardware registers are decremented. If the resulting value 
is not zero the increment and move is repeated. If, during the 
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execution of the instruction, an internal interrupt occurs or if the 
move crosses the frame boundary of a linked frame, the current con- 
tents of the internal hardware registers are stored in TO. For this 
reason the contents of TO at the conclusion of the move are indeter- 
minable. If TO is initially zero no operation is performed. 



Increment and Move String Under Address Control (MIIR) 



0110 


Ra 


Rb 


0011 



Ra and Rb are each incremented by one and then the byte at C(Ra) 
replaces the byte at C(Rb). Next Ra is compared with the contents of 
address register 15. If the values are not equal the operation is 
repeated. If Ra is initially equal to the contents of address register 
no operation is performed. 



Increment and Move String Under Match Control (MUD) 



0110 


Ra 


Pb 


0000 


Match 



4 4 4 4 8 

Ra and Rb are each incremented by one and then the byte at C(Ra) 
replaces the byte at C(Rb). The byte that moved is then tested for a 
match with one of 7 possible values as defined by the match field. If 
the match is not successful, the operation is repeated. 

The matching is performed as follows. For each of the bit positions 
one through seven that is a 1, a match test is performed. If bit posi- 
tion zero is a 1, the move stops on any equal match. If bit position 
zero is a 0, the move stops if none of the bytes tested match. The 
table below shows the test performed for each bit in the mask. 



Bit in Match Field 



Test Performed 



1 = Stop on equal = Stop if unequal 

Compare with Hexadecimal "FF" 

Compare with Hexadecimal "FE" 

Compare with Hexadecimal "FD" 

Compare with Hexadecimal "FC" 

Compare with Byte at 003 in PCB 

Compare with Byte at 004 in PCB 

Compare with Byte at 005 in PCB 



Note: byte 003 of the PCB may not contain a hexadecimal 00 or 01. 
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Increment and Scan String Under Match Control (SCD) 



0110 


Ra 




;•■■.•■■■•■•■•■ ..■■■■■■ 


1000 


Match 



Ra is incremented by one and then the byte at C(Ra) is tested for a match 
as defined by the match field. If the match is not successful, the opera- 
tion is repeated. See the description of the Increment and Move String 
Under Match Control instruction for the matching rules. 



2.5.9 CONVERSION OPERATIONS 

Conversion operations are provided to convert decimal integers represented 
by ASCII characters into binary values, and to convert hexadecimal integers 
into binary values, and binary values to hexadecimal. 



Decimal to Binary (MDB) 



1101 


la 


Da 


L 


00 


Rb 



The C(Ra,Da) are multiplied by ten. The binary value of the ASCII digit 
in the C(Rb) is added to the product, and the result replaces the 
C(Ra,Da). This instruction is not defined for a single byte at C(Ra,Da). 
(A value of L = represents a different operation.) 

If the C(Ra,Da) are initially zero, repeated use of this instruction (with 
incrementing of Rb) will convert an ASCII string representing a decimal 
value into a binary integer. 



Hexadecimal to Binary (MXB) 



1101 


Ra 


Da 


L 


10 


Rb 



8 



2 2 



The C(Ra,Da) are multiplied by sixteen. The binary value of the ASCII 
hexadecimal digit in the C(Rb) is added to the product and the result 
replaces the C(Ra,Da). If the C(Ra,Da) are initially set equal to zero, 
repeated use of this instruction will convert an ASCII string representing 
a hexadecimal value into a binary integer. 
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B inary to Hexadecimal (MBX) 



1101 


Ra 


Ea 


L 


11 


Rb 



The binary integer at the C(Ra,Da) is converted into an ASCII string 
starting at the C(Pb) +1. Bits 28 through 31 of the accumulator contain 
a count of the maximum number of ASCII bytes to be generated. If bit 24 
of the accumulator is a zero, the leading zeros of the hexadecimal string 
are suppressed and the C(Rb) +1 will contain the most significant non- 
zero hexadecimal digit. If bit 24 of the accumulator is a 1, zero 
suppression will net take place. The contents of the accumulator is 
unpredictable after this instruction is executed. 



2.5.10 INPUT OUTPUT OPERATIONS 

The input output operations provide for communication with the terminal 
associated with a process and for input and output with peripheral 
devices . 



Input a Byte (IB) 



0100 


Ra | K 


1001 


: 1 -',u,, J .--'- 



The K field specifies a 3 bit function code and a 5 bit device address. 
The byte from the selected device replaces the C(Ra). This instruction 
can be executed only in monitor mode. 



Output a Byte (OB) 



0100 


Ra 


K 


1000 





4 



& 



The K field specifies a 3 bit function code and a 5 bit device address. 
The single byte in the C(Ra) is transmitted to the selected device. This 
instruction can be executed only in monitor mode. 



Read Input Queue (READ) 



0110 


Ra 




0101 

__ —— 
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The next character from the terminal input queue replaces the C(Ra) . 
If the input queue is empty the process is suspended until a character 
is received from the terminal. Characters transmitted by the terminal 
are automatically queued in the PIB for the terminal. 



Write to Output Queue (WRITE) 



0110 



Ra ^-istt 



0110 



The byte in the C(Ra) is placed into the terminal output queue. If the 
queue is full, the process is suspended until the terminal has printed 
all but four characters from the queue. If there are any characters in 
the input queue before this instruction is executed, they are lost. 



2.5.11 MONITOR OPERATIONS 

The following operations are used to communicate with the monitor. 



Monitor Call (MCAL) 



0100 


Ra 


K 


0111 


D 



4 4 8 4 4 

This operation generates an interrupt into the monitor. Trie four bits 
of the D field are doubled to determine the location relative to byte 1 
of the monitor frame for transfer of control. 

The address contained in Ra, the address of the PCB of the current 
process, and the K field from this instruction are all placed into the 
PIB for the current process, and then control is passed to the monitor. 



Resume Virtual Process (RVP) 



00001010 



8 

This operation returns control to a process that has previously been 
interrupted. The status of the interrupted process is restored and 
execution of the process resumes from the point of the interrupt. This 
instruction can be executed only in monitor mode. 
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Start Virtual Process (SVP) 



00001001 



The FID portion of register 4 (of the monitor) is treated as the 
location of the PCB for a dependent process. The buffer map is 
searched for the PCB frame. If the PCB is present, registers and 1 
of the PCB are attached and execution of the process begins. If the 
frame is not present, the referenced FID is placed into the PIB and 
the monitor is reentered at the absent frame entry point (location 1) , 
This instruction can be executed only In monitor mode. 



HALT 



00001000 



The CPU is halted; this instruction can be executed only in monitor 
mode. 



Test Interrupts 



00000001 



This instruction has meaning only in the monitor mode; it is a NOP in 
the virtual mode. Internal and External Interrupts are tested for, 
and, if any are pending, a fault trap to the appropriate monitor 
location is taken. 



Halt and Display (HLD) 



0100 


Ra 




1010 




00 



Halts the CPU and gates the eight-bit literal addressed by register 
RA to the A bus where it can be displayed in the eight least signifi- 
cant indicator lamps of the system panel by depressing the Data select 
switch. This instruction is restricted to Monitor level code. 



E nter Console Command Switches (ECS) _ 



0100 


Ra 


... ,...„,,,,,,,,..., 


1010 


tt : :v : :- ,>: 


11 



4 4 8 4 2 2 

The status of the eight low-order console command switches is placed 
in the eight bit byte addressed by register RA. If the switch is on, 
the corresponding bit in the byte addressed by register RA is set to 
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one. This instruction is restricted to Monitor level code. If a 
switch is not set, the corresponding bit will be set to zero. 



0100 1 RA 
i 


x':'x'x ""'"yX;';";:;!;! 

lX-X X-XX XyXvXX 


1010 




01 



4 4 8 4 2 2 

The status of the four console sense switches is placed in the four 
most significant bits of the eight bit byte addressed by register RA. 
The status of a switch is one when the switch is set. The four low 
order bits are set to one. This instruction is restricted to Monitor 
level code . 



2.6 INSTRUCTION SUMMARY 

The following diagrams show the formats for each of the instructions. 
The diagrams are listed in order of increasing primary operation code 
(first four bits). The operation code is shown as a binary value. 
The second and third portions of the operation code (if they appear) 
are labeled 02 and 03 respectively. 



0000 


02 



02 

0000 

0001 

1000 

1010 

1011 

1100 

1101 



02 

0010 

0011 

0100 

0101 



INSTRUCTION 

No Operation 

Test Interrupts 

Halt the CPU 

Resume Virtual Process 

Start Virtual Process 

Branch to Absolute Address 

Branch and Stack Location, to Absolute Address 



0001 


02 



INSTRUCTION 

Branch Indirect (External) 

Branch and Stack Location Indirect (External) 

Return 

Return without Trace 



0001 


02 


D 


FID 



12 



02 INSTRUCTION 

0000 Branch (External) 

0001 Branch and Stack Location (External) 
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0001 



02 



Ra 



Rb 



4 4 4 4 

02 INSTRUCTION 

0110 Move Address Register to Address Register 

0111 Exchange Address Registers 



0001 



02 



10 



02 
10 
11 



INSTRUCTION 

Branch and Stack Location (Internal) 

Branch (Internal) 



0010 



Ra 



INSTRUCTION 

Decrement Address Register 



|" 0011 



Ra 



INSTRUCTION 

Increment Address Register 



0100 Ra 



02 



10 



02 INSTRUCTION 

000000 Branch Character Not Equal to Immediate 

000001 Branch Character Less Than Immediate 

000010 Branch Character Equal to Immediate 

000011 Branch Character Less Than or Equal to Immediate 



0100 Ra 



K 



02 



02 


INSTRUCTION 


0010 


Move Immediate Character 


0100 


Increment and Store Immediate Character 


0110 


Flag the Address Register 


0000 


Output Byte 


1001 


Input Byte 


1100 


Or 


1101 


Exclusive Or 


1110 


And 


1111 


Shift 
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0100 


Ra 


K 


02 


D 



Ql INSTRUCTION 

0111 Monitor Call 



0101 


Ra 


Rb 


02 


S 



10 



02 
00 
01 
10 
11 



INSTRUCTION 

Branch Character Not Equal 

Branch Character Less Than 

Branch Character Equal 

Branch Character Less Than or Equal 



0110 


Ra 


Rb 


02 



02 INSTRUCTION 

0001 Increment Source Register and Move Character 

0010 Increment Both Registers and Move Character 

0011 Increment and Move String Under Address Control 

0100 Increment and Move String Under Count Control 

0101 Read Terminal Queue 
0111 Exchange Bytes 
1001 Move Byte 

1010 Increment Destination Register and Move Character 

1101 Write Terminal Queue 



0110 


Ra 


Rb 


02 


Match 



02 INSTRUCTION 

0000 Increment and Move String Under Match Control 

1000 Increment and Scan String Under Match Control 



0111 


Ra 


Da 



INSTRUCTION 
Set Bit Off 



2-51 



1000 


Ra 


Da 



INSTRUCTION 
Set Bit On 



1001 


Ra 


Da LM 


02 


S 



10 



02 


INSTRUCTION 




00 


Branch Bit On 


01 


Branch Bit Off 


1010 


Ra 


Da 


L 


02 



02 


INSTRUCTION 


000000 


Store a Zero 


000001 


Store a One 


000011 


Add One to Storage 


000101 


Subtract One from Storage 


001000 


Negate Storage 


010000 


Multiply 


010001 


Divide 


010011 


Add to Accumulator 


010101 


Subtract from Accumulator 


011000 


Load Accumulator 


011001 


Store Accumulator 



1011 


Ra 


Da 


Rb 


02 


S 



10 



02 
00 
01 
10 
11 



INSTRUCTION 

Branch Relative Character Not Equal 

Branch Relative Character Less Than 

Branch Relative Character Equal 

Branch Relative Character Less Than or Equal 
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1100 


Ra 


Da 


Rb 


02 


S 



10 



£2 
00 
10 



INSTRUCTION 

Branch Addresses Equal 

Branch Addresses Not Equal 



1101 


Ra 


Da 


L 


02 


Rb 



2 2 



02_ 
00 
00 
01 
10 
11 



INSTRUCTION 

Move Byte to Relative Byte (L equal to zero) 

Decimal to Binary (L not equal to zero) 

Move Offset Byte to Byte 

Hexadecimal to Binary 

Binary to Hexadecimal 



1110 


Ra 


Da 


02 


Rb 



02_ INSTRUCTION 

0011 Load Effective Address (half word) 

0100 Subtract from Address Register 

0101 Add to Address Register 

0111 Load Effective Address (full word) 

1011 Load Effective Address (double word) 

1100 Load Absolute Address Difference 

1101 Store Address Register 

1110 Load Address Register 

1111 Load Effective Address (triple word) 



1111 



Ra 



Da 



L 02 Rb 



Db 



91 
00 

10 

11 



INSTRUCTION 

Move Storage to Storage 

Add Storage to Storage 

Subtract Storage from Storage 
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1111 


Ra 


Da 


L 


02 


Rb 


Da 


03 | S 



10 



£2 0_3 INSTRUCTION 

01 010100 Compare and Branch Not Equal 

01 010101 Compare and Branch Less Than 

01 010110 Compare and Branch Equal 

01 010111 Compare and Branch Less Than or Equal 

01 011100 Subtract and Branch Not Equal 

01 011111 Subtract and Branch Less Than Equal or Equal 

01 011101 Subtract and Branch Less Than Equal 

01 011110 Subtract and Branch Equal 
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2 . 7 CORF. MAP 



Core Address 



0000 
0100 

0200 
0300 
0400 

0600 
0700 

0800 



0A00 



0C00 



0E00 



Monitor PCB 



Bootstrap software 

Monitor address registers and 
Return stack area 



Buffer Status table 
Buffer Fid (low-order) table 
Buffer Links (Queue) 
Monitor Software 



Buffer Fid (high-order) table 

Hardware memory-protect to this 
point 



< PIB's (communication device 

addresses X'18 1 and X'19') 



■* PIB's (communication device 

addresses X'lA' and X'lB') 



*\ 



Monitor Software extension 

Software memory-protect to this point 
Start of available core area 
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2.S PERIPHERAL I/O: DEVICE ORDERS 



Order 
Number 





Operation 



Data Transfer 



Stat us /Function 



Block Input/INT 



Arm Interrupt 



Disconnect 



Disarm Interrupt 



Block Output/INT 



Unassigned 



Description 



A data byte will be transferred between 
the addressed device and the processor. 
Direction of the transfer will depend on 
whether the instruction is an input, or an 
output . 

A status byte will be input from the 
addressed device or a function byte will be 
output to the addressed device, depending 
on whether the instruction is an input or 
an output. 

The addressed device will start a concur- 
rent block input to memory and will 
generate an external " interrupt at the con- 
clusion of the transfer unless the interrupt 
has been subsequently disarmed. This order 
should be sent by an output instruction. 

Permits the addressed device to make an 
external interrupt request upon the satis- 
faction of an interrupt condition. This 
order should be sent by an output instruction, 

The block transfer in progress by the addres- 
sed device is stop ed and end of block 
interrupt will occur unless the interrupt 
has been disarmed. This order should be. 
sent by an output instruction. 

Inhibits the addressed device from marking 
an external interrupt request under any 
condition. This order should be sent by 
an output instruction. 

The addressed device will start a concur- 
rent block output from memory and will 
generate an external interrupt at the con- 
clusion of the transfer unless the interrupt 
has been subsequently disarmed. This order 
should be sent by an output instruction. 

This order, if assigned, may perform any 
required function as interpreted by the 
individual interface. If a byte transfer 
is desired the order may be sent by an 
input or an output instruction. 
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SECTION 3 
REALITY ASSEMBLY LANGUAGE (REAL) 



The Reality Assembler (REAL) translates source statements into Reality CPU 
machine language equivalents. The source file, or "mode" is an item in any 
file defined on the database. The mode is assembled in place; that is, at 
the conclusion of the assembly process, the item contains both the original 
source statements, as well as the generated object code. The same mode can 
then be used to generate a formatted listing (using the MLIST verb) or can 
be loaded for execution (using the MLOAD verb). 



3.1 SOURCE LANGUAGE 

The source language accepted by the REAL assembler is a sequence of 
symbolic statements, one statement per source-item line. Each statement 
consists of a label field, an operation (or op-code) field, an operand 
field, and a comment field. 



3.1.1 LABEL FIELD 

The label field begins in column one of the source statement, and is termi- 
nated by the first blank or comma; there is no limit on its length. If the 
character "*" appears in the first column, the entire statement: is treated 
as a comment, and is ignored by the assembler. The reserved characters 
* + - ' = are the only ones that may not appear in the label field. An 
entry in this field is optional for all except a few opcodes. A label may 
not begin with a numeric character. 



3.1.2 OPERATION FIELD 

The operation field begins following the label field and consists of a legal 
REAL op-code. Op-codes are pre-defined in the permanent op-code symbol file 
OSYM and consist of one or more alpha characters. Op-codes may be mnemonics 
for Reality machine language instruction (eg., B for BRANCH) macros, which 
may assemble into several Reality machine language instructions (eg., MBD 
for MOVE BINARY to DECIMAL), or assembler pseudo-ops (e-g., ORG for ORIGIN). 
Additionally, users may define new mnemonics or "macros" which expand into 
several Reality machine instructions. This may be done by creating new 
entries in the OSYM file. 
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3.1.3 OPERAND FIELD 

Operand field entries are optional, and vary in number according to the 
needs of the associated REAL op-code. Entries are separated by commas and 
cannot contain embedded blanks (except for character string literals 
enclosed by single quotes). The operand field is terminated by the first 
blank encountered. The characters + - ' * have special meaning in this 
field. 



3.1.4 OPERAND FIELD EXPRESSIONS 

Entries in the operand field may be a symbol, or a constant. A symbol is 
a string of characters that is either defined by a single label-field entry 
in the mode, or is an entry in the pre-defined permanent symbol file (PSYM) , 
A constant may be one of the following forms: 

* - Defines current value of the assembler location counter. 

n - (n decimal) - A decimal constant. 

X'h* - (h hexadecimal) - A hexadecimal constant. 

C'text' - Character string; any characters, including blanks and 

commas, may appear as part of "text"; a sequence of two 

single quotes ('') is used to represent one single quote 
in the text. 

Arithmetic operators (+,-) may be used to combine two or more constants. 

3.1.5 COMMENT FIELD 

Any commentary information preceded by a blank may follow the operand field 
entries. 

3.1.6 "ARGUMENT'' FIELD 

For the purposes of the remainder of this documentation, the label field 
entry, op-code field entry, and operand field entries will be referred to 
as "argument field" (AF) 0, 1, 2, etc. 
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3.2 CALLING THE ASSEMBLER 

The assembler is called by the statement: 

AS file-name item-name {(Q) } 

which will assemble the item in the file specified. The optional specifi- 
cation "(Q)" specifies that error lines are not to be listed at the end 
of the assembly. 

As the assembler processes, it will output an asterisk (*) as every ten 
source statements are assembled. At the end of pass-1 a new line is 
started and an asterisk is printed for each ten statements reassembled. 

3.3 LISTING OUTPUT 

The listing processor may be called by the statement: 

MLIST file-name item-name {(options) } 

Options are separated by commas: 

P Routes output to the line-printer. 

M Prints macro-expansions of source statements. 

E Prints error lines only; also suppresses the pagination, and 
enters EDIT at the end of the listing. 

Z Inhibits EDIT entry when E option is specified. 

n-m Restricts listing to line numbers n through m inclusive. 

The listing is output with a statement number, location counter, object 
code and source code, with the label, op-code, operand and comment fields 
aligned. A page heading is output at the top of each new page. 

Errors, if any, appear in the location counter/object code area; macro 
expansions appear as source code if not suppressed, with the operation 
codes prefixed by a plus sign (+) . 

A sample listing output is shown on the next page. 
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:mm M%G&&H&:M$k <1~25,M> {£§) 



MODE: ABSL 



001 



002 
003 

004 

005 

006 
007 
008 
009 
uiu 
Oil 
012 
013 

014 
015 
016 
017 

018 



001 7FF0002F 

001 1C04 
003 1C3C 
005 1D80 

007 100031 

nn n nnnnnnocr 
UUM UUUUUU^I 

nnc nnnnnnT) 

012 0000 
014 80FFFFC 



19 



020 
021 
022 

023 

024 
025 
EC 



018 E062E4 
01B 111006 
01E 7 

GIF 54415045 
023 20464F52 
027 4D415420 
02B ^-352S24F 
02F 52 
030 FDFF 

03 2 A05E53 
035 6 Li -B4 
037 11200b 
05A 08 

03B FOC171E7 
03F 1CAC 
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17:26 26 OCT 1973 



*SYSTEM 



DETACH 
GETW5 

!ABSD 

ABSLFID 

OF1FID 

XU5ER 

PIBADDR 



FRAME 
+FRM: 
+ORG 
MODE 
B 

+b: 

B 

+b: 

R 

+B: 

DEFM 
DEFM 

ENT 

rvri v 

i_^ t I l 

DTLY 
DEFT 
ADDR 



047 
047 
1 

1ABSD 

!ABSD 

!ABSL 

1ABSL 

ISFGMNT 

1SEGMNT 

14, TAPE IO 

3,WSPACES 

ABSD 

47 

34 

15, USER 

0,X'80FFFFFC 



FID OF TH I S PROGRAMME 

FID OF OF1 PROGRAMME 

TALLY USER RELATIVE TO REGISTER 15 



* ERROR ENTRY POINT * 
TPERR MOV JSBAG, IS 

BSL CRLFPRINT 

TEXT X'07',C'TAPE FORMAT ERROR' 



TDFr 



Mil IS,0B,O3SIZE 

+LOADT OBS1ZE 
-hMI ITRR IS ,03 
bSL a'RTLIN 
TEXT X'08' 

+DEC RSCWA,=r4 
B NXTAB 

+B : NXTAB 



COPY TAPE DATA y, PP INT 



BLOW-UP HERE 
CACKUP STACK 

CONTINUE TO NEXT TAPE SEGMENT 



****************************£***************** 



3.4 LOADING 

The assembled mode may be loaded into the frame specified by the FRAME 
op-code by using the statement: 

MLOAD file-name item-name 

If the load is successful, the message: 

[216] 'item-name' LOADED ON FRAME // n 
size = m (DEC), h (HEX) 

is returned. 

The mode will not load correctly if its size exceeds 512 bytes, or if a 
FRAME statement is not the first statement assembled in the mode. In 
either case, a message will be returned indicating the error. 

Note: MLDAD can not load itself. It must be loaded by the XLOAD verb by 
the following message: 

XLOAD SYSTEM-MODES LOADER 



3.5 VERIFYING A LOADED PROGRAM MODE 

After assembling and loading a program, the TCL-II verb MVERIFY is used 
to check the assembled program against the loaded program. 

Examples : 

: mmm sm cxahpu 

[217] MODE 'EXAMPLl' VERIFIED FRAME = 34 SIZE = 477 
: HVeRlFY SM E#*IPL2 <£!) 
014 OC 18 
[218] MODE 'EXAMPL2' HAS 1 BYTES OBJECT CODE MIS-MATCHES 



The first example verifies, but the second does not. In example two, 
the system informs the user that one byte at byte address 14 should have 
a value of OC, not 18. 

An "A" option is available, and will cause a columnar listing of all bytes 
which mismatch. Each value in the source file which mismatches will be 
listed, followed by the value in the executable frame. 



3-5 



Example : 

rMVBUFY SM EXAMPL3 CA) 



LOC XX YY LOC XX YY 
014 OC 18 015 13 17 



LOC XX YY 
016 OE OD 



LOC XX YY 
017 3 A 3C 



[218] MODE 'EXAMPL3' HAS 78 BYTES OBJECT CODE MIS-MATCHES 



3.6 TCL-II CROSS REFERENCE CAPABILITY 

3.6.1 CROSS -INDEX VERB 

The TCL-II CROSS-INDEX Verb first clears the CSYM file then updates it by 
item with the external references of that item. The CROSS-INDEX Verb 
requires the following format: 

CROSS-INDEX file-name item- list { (options) } 

Example : 

: CROSS-INDEX MOPES * (C^) 

Would cross index all items of the modes file. An example of what a por- 
tion of the CSYM file might: look like after using the CROSS-INDEX Verb 
follows. Notice that the item called DLOAD has one external reference to 
LISTFLAG, two external references to RMBIT, etc. 



001 
002 
003 
004 
005 
006 
007 



009 
010 



001 
002 
003 
004 
005 
006 
007 



009 
010 



DLOAD 

LISTFLAG 01 RMBIT 02 

CH8 01 

NNCF 02 

CTR1 02 CTR2 01 MODULO 07 OBSIZE 01 RSCWA 01 SEPAR 10 T0 01 T4 03 

BASE 08 D0 01 OVRFLW 01 R15FID 01 RECORD 05 

BMSBEG 01 CSBEG 01 ISBEG 02 OBBEG 01 S2 02 

CS 06 IS 21 OB 05 R14 03 R15 06 TS 01 

ABSL 02 CRLFPRINT 01 CVDR15 03 CVTNIS 02 GETBLK 01 LINK 01 MBDNSUB 03 

UPDITM 01 WRTLIN 02 

AM 02 



WRAPUP-III 

INHIBIT 04 RMBIT 04 SB60 03 SB61 06 



CTR0 13 CTR1 03 EMOD 01 MMOD 01 MODULO 01 OBSIZE 02 T0 02 T6 03 USER 04 

BASE 03 EBASE 03 MBASE 01 

BMSBEG 03 OBBEG 02 OBEND 06 SR4 02 SYSR1 02 

AF 08 BMS 04 IR 25 OB 30 R14 04 R15 03 TS 14 

DATE 01 GBMS 01 RETIX 02 TIME 01 WRITOB 01 WRTLIN 08 

AM 05 MMOD 01 SM 04 
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DUMP- I 
001 GBIT 06 
002 

003 NNCF 01 NPCF 01 

004 CI 08 C2 02 C6 07 C7 06 REJCTR 01 T0 01 T4 01 

005 03 07 D4 05 FRMP 01 LINQUE 07 RECORD 07 

006 IREND 06 SI 03 S3 08 

007 1R 18 IS 15 OB 17 R15 14 IS 05 

008 CVTNIS 04 DUMP- 1 1 01 MBDNSUB 01 MBDSUB 07 MD99 01 MD999 01 RDREC 04 
WRTLIN 05 

009 LF 02 
010 

PROC-I 

001 PQFLG 04 SB1 02 SB2 01 SBIT 07 STKFLG 01 

002 PRMPC 01 
003 

004 CI 01 T0 02 
005 

006 BMSBEG 01 IBBEG 01 IBEND 01 ISBEG 01 OSBEG 01 PBUFBEG 04 PQBEG 02 
PQCUR 02 PQEND 03 SR35 01 SR4 01 02 

007 CS 02 TB 07 IR 81 IS 11 OB 05 OS 01 R14 12 TS 04 UPD 12 

008 CVTHIR 01 GETIBX 01 MD18 01 MD995 01 MD999 01 PROC-I I 04 PROC-I 1 1 04 
WRAPUP-I 01 WRITOB 01 WRTLIN 

009 AM 12 CR 01 SM 02 VM 01 
010 

3.6.2 XREF VERB 

The TCL-II XREF Verb uses the CSYM file as updated by the Cross-Index 
Verb for input. XREF then updates the XSYM file in the opposite order of 
the CSYM file. The XREF Verb requires the following format: 

XREF file-name item-list { f ot>ti ons) } 
Example : 

: mm (mm* 



Would cross reference all items of the CSYM file. An example of what a 
portion of the XSYM file might look like after using the XREF Verb fol- 
lows. Notice that the item called T4 was externally referenced by 
DLOAD, DUMP- I, and SYSTEM-SUBS-II. 



MBIT 
1 ASTAT 

GEN 
1 ASTAT 

CVDR15 
II DLOAD 



3-7 



LFDLY 
001 SYSTEM-SUBS- 1 1 

PAGSIZE 
001 SYSTEM-SUBS- 1 1 

001 DLOAD DUMP-] SYSTEM-SUBS- 1 1 

D5 
001 SYSTEM-SUBS- 1 1 

CTR2 
001 DLOAD AID1 

UPDITM 
001 XREF I LOAD T-LOAD DLOAD EDIT-IV/P&A 

CI 
001 XREF ILOAD ASTAT T-LOAD DUMP- I PROC-I EDIT-IV/P&A EDIT-I 

SR13 
001 EDIT-I 

SR7 
001 EDIT-I 

MBASE 
001 XREF WRAPUP--III TI WII 

DB1 
001 WII 

B15 
001 MONITOR/2950, 10MB 

R7WA 
001 DISK-DIAGNOSTIC/ 2 31*+ 

T5 

The sort verb may be used after performing X-REF to produce a sorted out- 
put. 

Example : 

:SORT XSYM REFERENCES NONCOt <P)(g§) 

Would produce an alphabetical non-columnar listing on the line printer. 
References and noncol are attribute definitions in the XSYM dictionary. 

The following is an example of a partial listing. 



o- o 
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XSYM : ABIT 

REFERENCES ED IT- I 

XSYM : ABSL 

REFERENCES DLOAD 



XSYM : ACF 
REFERENCES 



WII 



XSYM : ADDLAB 
REFERENCES ASTAT 

XSYM : AF 
REFERENCES ASTAT 

XSYM : AFBEG 
REFERENCES ASTAT 

XSYM : AFEND 
REFERENCES ASTAT 



WRAP-III 



ED IT- I 



EDIT-I 



XSYM : ALIGN 








REFERENCES 


ASTAT 






XSYM : AM 








REFERENCES 


XREF 


ASTAT 


T-LOAD 




DLOAD 


WRAPUP-III 


PROC-I 




AID1 


TI 


WII 



3.6.3 XREF PROC 

The XREF Proc will perform the following functions: 

1. Clear the XSYM file. 

2. Use the XREF verb to update the XSYM file. 

3. Alphabetically sort the XSYM file and output the results to 
either the user's terminal or to the system line printer. 

The XREF Proc requires the following format: 

XREF file-name item-list {(options)} 

Example : 

: XRZf CSFM * CpS 



would cross reference all items of the CSYM file and would list the 
results in alphabetical order on the line printer. 
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The following is an example of a partial listing. 



XSYM 


, . .REFERENCES 


ABIT 


EDIT-] 


ABSL 


DLOAD 


ACF 


WII 


ADDLAB 


AS TAT 


AF 


ASTAT 




WRAPUP-III 




EDIT-I 


AFBEG 


ASTAT 




edit-: 


AFEND 


ASTAT 


ALIGN 


ASTAT 


AM 


XREF 




ASTAT 




T-LOAD 




DLOAD 




WRAPUP-III 




PROC-I 




AID1 




TI 




WII 


ATTOVF 


WII 


B15 


MONITOR/2950, 10MB 


B4 


MONITOR/2950, 10MB 


BASE 


XREF 




I LOAD 




ASTAT 




T-LOAD 




DLOAD 




WRAPUP-III 




TI 




WII 



11:20 20 DEC 1973 
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3.7 THE REAL INSTRUCTION REPERTOIRE 

In defining the REAL op-codes the following set of symbolic operands are 
used. 

DESCRIPTION 



S YMBOL OPERAND 

a ABS 

b BIT 

c CHARACTER 

d DOUBLE-WORD 



m 



HALF-WORD 



LABEL 



MODE ID 



An absolute core-address reference 

A bit addressed relatively via a base address 
register and a bit displacement. 

A byte addressed relatively via a base address 
register and an 8-bit byte displacement. 

A 4-byte field a Idressed relatively via a base 
register and a 16-bit word displacement. 

A 1-byte field addressed relatively via a base 
register and an 8-bit byte displacement. 

A label definition local to the current 
program frame. 

A 16-bit modal identification, comprised of a 
4-bit entry point and a 12-bit frame number. 
The implied location is in the frame defined 
by the low-order 12-bits of "m", offset from 
the frame-beginning by twice the entry-point 
value. 



LITERAL 



A literal or immediate value. The size of the 
assembled literal or value is dependent on 



ADDRESS-REGISTER 



STORAGE-REGISTER 



WORD 



One of the sixteen Reality address registers 
(A/R's). 

A 6-byte field (usually a storage-register, 
or S/R) relatively addressed via a base 
register and a 16-bit word displacement. 

A 2-byte field relatively addressed via a 
base register and a 16-bit word displacement. 
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Note: The parenthesized footnotes in the following sub -sections are de 
fined in Section 3.7.12. 

3.7.1 CHARACTER INSTRUCTIONS (MOVES) 

MCC n,c (1) Move Character to Character; the. byte 

(character) defined or addressed by 
operand-1 is moved to the location addressed 
by operand-2. 



n,c 


(1) 


n,r 
n, s 


(1) 


c,c 




c,r 
c,s 


(1) 


r,c 




r,r 
r,s 
s,c 
s,r 
s ,s 


(1) 
(2) 
(3) 
(2) 


n,r 
n, s 


(1) 


c,r 
c ,s 


(1) 


r,r 




r,s 

s,r 
s,s 


(3) 
(2) 


n,r,n 
n,r,h 
n>r,t 
n,r,d 


(4) 
(4) 
(A) 
(4) 



MCI n,r Move Character to Incrementing character; 

the byte (character) pointer operand-2 is 
incremented by one and the byte defined 
or addressed by operand-1 is moved to the 
location then addressed by operand-2. 



MCI n,r,n (4) Move Character Incrementing; the byte 

(character) pointer operand-2 is 
incremented by one and the byte defined 
by operand-1 is moved to the location 
then addressed by operand-2. This 
process continues until the number of 
bytes specified by operand-3 have been 
moved. At least one byte is always 
moved and if initially operand-3 = 0, 
65,536 bytes will be moved. 

MIC r,c Move Incrementing character to Character; 

the byte (character) pointer operand-1 is 
incremented by one and the byte then 
addressed by operand-1 is moved to the 
location addressed by operand-2. 



r,c 




r,r 




r,s 


(1) 


s ,c 


(2) 


s,r 


(3) 


s,s 


(2) 
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Mil r,r Move Incrementing character to Incrementing 

character; both byte pointers are incremented 
by one and the byte then addressed by 
operand-1 is moved to the location addressed 
by operand-2. 



r,r 




r,s 


(1) 


s,r 


(3) 


s ,s 


(2) 


r,r,n 


(5) 


r,r,h 


(5) 


r,r,t 


(5) 


r,r,d 


(5) 



Mil r,r,n (5) Move Incrementing character to Incrementing 

character; both byte pointers are incremented 
by one and the byte addressed by operand-1 
is moved to the location addressed by 
operand-2. This process is repeated until 
the number of bytes specified by n,h,t or d 
have been moved. h,t or d are not destroyed 
and if initially zero, no bytes are moved. 

Mil r,r,r (3) Move Incrementing character to Incrementing 
r,r,s (3) character; both addressing-registers 

operand-1 and operand-2 are incremented by 
one and the byte then addressed by operand-1 
is moved to the location addressed by 
operand-2. This process is repeated until 
the first addressing-register operand-1 
matches the byte-pointer operand-3. If 
operand-1 = operand-3 on entry no movement 
takes place. 

MUD r,r,n Both addressing-registers are incremented by 

one, and the byte addressed by addressing- 
register-1 is moved to the location 
addressed by addressing-register-2 . The byte 
moved is then tested under the following 
masking condition where "n" is an 8-bit 
mask field: 

Bit Meaning 






True/False 


1 


Match on: X'FF' 


2 


X'FE' 


3 


X'FD' 


4 


X'FC 


5 


SCO 


6 


SCI 


7 


SC2 



Bit is a true/false flag; is set, the 
move stops on a "match" condition (as 
defined by bits 1 through 7); if zero, the 
move stops on a "non-match". Bits 1 through 
7 represent one character each; if any bit 
is set, the byte moved is compared to the 
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character represented by the bit for a 
match. Bits 1 through 4 represent: the 
special system delimiters SM, (X'FF), 
AM (X'FE'), VM (X'FD'), and SVM (X'FC) 
respectively. Bits 5, 6, and 7 represent 
the contents of the scan character-registers 
SCO, SCI, and SC2 respectively. (Thus only 
three of the delimiters are variable. 
NOTE: Character-register SCO may not. con- 
tain the hex patterns X'OO' or X'01'. 

SCD r,n Scan characters to delimiter (s^ . The 

addressing-register is incremented till 
a "match" condition (see MUD instruction) 
as defined by the 8-bit mask field "n" 
is found. 

MIIT r,r This instruction assumes that, the lower 

half of the accumulator (TO) has an absolute 
byte count (up to 65535) defining the. 
number of bytes to be moved (see Mil op- 
code). If TO is zero when the instruction 
is executed, no operation is performed. 
Otherwise, the addressing-registers are 
incremented by one, and the byte addressed 
by addressing-register-1 is moved to the 
location addressed by addressing-register-2, 
and TO is decremented by one. This 
sequence is repeated till TO reaches zero. 

MIIR r,r This instruction assumes that address register 

R15 is setup to a location equal to or greater 
than that of addressing-register-1. (See Mil 
op-code). If the addresses of addressing- 
register-1 and register R15 are equal, no 
operation is performed. Otherwise, the 
addressing-registers are incremented by one, 
and the byte addressed by addressing-register-1 
is moved to the location addressed by 
addressing-register-2. This sequence is 
repeated till the addresses of addressing- 
register-1 and register R15 are equal. 
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xcc 


c,c 


(2) 




c,r 


(3) 




c,s 


(2) 




r,c 


(1) 




r,r 






r,s 


(1) 




s ,c 


(2) 




s,r 


(3) 




s , s 


(2) 


OR 


c ,n 
r,n 


(3) 




s ,n 


(3) 


XOR 


c ,n 
r,n 


(3) 




s ,n 


(3) 


AND 


c ,n 
r,n 


(3) 




s ,n 


(3) 


3.7.2 


CHARACTER 


INST 


BCE 


n,c,l 
n,r,l 


(1) 




c,n,l 


(3) 




c,c,l 






c,r,l 






r,n,l 






r,c,l 






r,r,l 




BCU 


(see BCE) 




BCL 


(see BCE) 




BCLE 


(see BCE) 





Exchange Character with Character; the byte 
(addressed) by operand-1 is interchanged 
with the byte defined by operand-2. 



BCH 



BCHE 



(refer to BCE) 
(refer to BCE) 



OR character; the byte (character) addressed 
by operand-1 is logically or'd with the 
8-bit immediate operand-2. 

Exclusive OR character; the byte (character) 
addressed by operand-1 is exclusively or'd 
with the 8-bit immediate operand-2. 

AND character; the byte (character) 
addressed by operand-1 is logically and'd 
with the 8-bit immediate operand-2. 



Branch Character Equal; the byte (character) 
defined or addressed by operand-1 is compared 
to the byte defined or addressed by operand-2, 
If the two bytes are equal, instruction 
execution branches to the location as defined 
by operand-3. Neither operand-1 nor 
operand-2 are altered. The arithmetic 
condition flag (ACF) is set on c,c,l only. 

Branch Character Unequal; branch if 
characters are not equal. 

Branch Character Low; branch if operand-1 
is less than operand-2. 

Branch Character Less than or Equal; branch 
if operand-1 is less than or equal to 
operand-2 . 

Branch Character High; branch if 
operand-1 is greater than operand-2. 

Branch Character High or Equal; branch if 
operand-1 is greater than or equal to 
operand-2. 
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BCN r,l Branch If Character is tumeric; branch 

if the character addressed by the first 
operand is in the range 0-9, inclusive. 

BCX r,l Branch if Character is hexadecimal; 

branch if the character addressed by 
the first operand is in the T-an^e 0-9 
or A-F, inclusive. 

BCA r,l Branch if Character is Alphabetic; 

branch if the character addressed by 
the first operand is in the range A-Z, 
inclusive. 



3.7.3 BIT INSTRUCTIONS 

SB b Set Bit; the bit addressed by the 

operand is set to an on condition (one) 

ZB b Zero Bit; the bit addressed by the 

operand is set to an off cone, ition 
(zero) . 

BBS b,l Branch Bit Set; the bii addressed by 

operand-1 is tested and if set (one) 
instruction execution branches to the 
location defined by operand-?. 

BBZ b,l Branch Bit Zero; the bit: addressed by 

operand-1 is tested and If not set 
(zero) instruction execution branches 
to the location defined by operand-2. 



3.7.4 DATA. MOVEMENT AND ARITHMETIC INSTRUCTIONS 

All arithmetic is done on two's complement binary integers. All 
instructions in this section except the MOV set the arithmetic condi- 
tion flag (ACF). 

MOV n,h (6) MOVe word to word; integer defined or 

addressed by integer- 1 is moved to the 
location addressed by operand- 2, 



n,h 


(6) 


n,t 




n,d 




h,h 




h,t 


(6) 


h,d 


(6) 


t,h 


(6) 


t,t 




t,d 


(6) 


d,h 


(6) 


d,t 


(6) 


d,d 




b.b 
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TST 



INC 



DEC 



ZERO 



ONE 



NEG 



LOAD 



h 




t 




d 




h 




t 




d 




h,n 


(6) 


h,h 




h,t 


(6) 


h,d 


(6) 


t,n 




t,h 


(6) 


t,t 




t,d 


(6) 


d,n 




d,h 


(6) 


d,t 


(6) 


d,d 




h 




t 




d 




h,n 


(6) 


h,h 




h,t 


(6) 


h,d 


(6) 


t,n 




t,h 


(6) 


t,t 




t,d 


(e; 


d,n 




d,h 


(6) 


d,t 


(6) 


d,d 




h 




t 




d 




h 




t 




d 




h 




t 




d 




n 




h 




t 




d 





Test the contents of the operand and 
set the arithmetic condition flags. 



INCrement by one; the integer defined 
by the operand is incremented by one 

INCrement word by word; the integer 
defined or addressed by operand-2 is 
added to the integer stored in the 
location addressed by operand-1 and 
the result is stored in the latter 
location. 



DECrement by one; the integer defined 
by the operand is decremented by one. 

DECrement word by word; the integer 
defined or addressed by operand-2 is 
subtracted from the integer stored in 
the location addressed by operand-1 
and the result is stored in the latter 
location. 



ZERO word; a zero is moved to the 
operand location defined by operand-1. 



Set word ONE; an integer value of one 
is moved to the operand location defined 
by operand-1. 

NEGate word; the Integer defined by 
operand-1 is negated (two's complement). 



LOAD to accumulator; the integer 
addressed by operand-1 is loaded into 
the 32-bit accumulator (DO) . For half- 
word and word operands, the sign bit is 
extended. 
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STORE h STORE from accumulator; the contents of 

t the 32-bit accumulator (DO) are stored 

d into the location defined by operand-1. 

For half-word and word operands, the 
high order bits are lost. 



ADD n ADD to accumulator; the integer addressed 

h by operand-1 is added to the 32-bit 

t accumulator (DO) with sign extension, 
d 

SUB n SUB from accumulator; the integer addressed 

h by operand-1 is subtracted from the 32-bit 

t accumulator (DO) with sign extension, 
d 

MUL n MULtiply to accumulator; the integer 

h addressed by operand-1 is multiplied by the 

t contents of the 32-bit accumulator (DO) . 

d The resulting product is stored in the 

64-bit accumulator extension (D1,D0), 
as a 63 bit number and a duplicated 
sign bit, 

DIV n Divide into the accumulator; the integer 

h addressed by operand-1 is divided into 

t the 32-bit accumulator (DO) . The answer 

d is stored in DO and the integer 

remainder is stored into the accumulator 

extension (Dl) . 



3.7.5 REGISTER INSTRUCTIONS 

MOV r,r MOVe register to register; the address or 

r,s storage register operand-1 is moved into 

s,r the address or storage register operand-2. 
s,s 

XRR r,r exchange Register with Register; the 

r,s (1) address or storage register operand-1 is 

s,r (2) exchanged with the address or storage 

s,s (1) register operand-2. 

INC r INCrement register; the address or storage 

s register operand-1 is incremented by one. 

INC r,n INCrement register by count; the address 

r> h or storage register operand-1 is incremented 

r> t by the integer stored at the location 

r ^d addressed by operand-2. 

s ,n 

s,h 

s,t 

• •d 
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DEC r DECrement register; the address or storage 

s register operand-1 is decremented by one . 

DEC r,n DECrement register by count; the address or 

r,h storage register operand-1 is decremented by 

r,t the integer stored at the location addressed 

r d by operand-2. 

s ,n 
s ,h 
s,t 
s,d 

LAD r,r (7) Load Absolute Difference; the absolute 

r,s difference in bytes (characters) between 

s,r the byte pointer operand-1 and the byte 

s,s (1) pointer operand-2 is computed and stored 

into the lower half of the accumulator (TO) . 
Please see special note following Branch 
Register Equal/Unequal instructions. 

SRA r,c Set Register to Address; the byte pointer 

r,h operand-1 is set pointing to the first 

r,t byte of the functional element at the 

r,d location addressed by operand-2. 
r,s 
r,l 

FAR r,n Flag and Attach Register; the address- 

register operand-1 is attached and 
secondary processing as defined by the 
8-bit literal n is performed: 

- I/O busy for buffer 

1 not used 

2 - buffer core-locked 

3 - write-required 

4 not used 

5 Set-up R15 to 1st byte unlinked; 
old buffer status in R15DSP 

6 Change buffer FID 

7 - OR n with status, 1 - AND n 
with status 

In normal execution only n2 is effective; 
the remainder of the functions can only be 
evoked in the "monitor mode." 
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BE r,r,l (7) (10) Branch Register Equal/Unequal; the address 
r,s,l of the byte pointer operand-1 is compared 

s,r,l to the address of the byte pointer 

operand-2. The branch is taken appro- 
priately. If the FID's of the registers are 
unequal, it is assumed that the affected 
frames are contiguously linked and the 
address computation is made on that basis; 
further, the difference in the FID's is 
assumed to be less than or equal to 
thirty-two (32) ; therefore the instruction 
execution may prove incorrect: if 1) The 
FID's are unequal and not contiguously 
linked or 2) One of the registers is in an 
unlinked format, and the other is not. 
TFor special information regarding 
the BE and BU instructions, refer to 

Section 3.14.) 

BE S,s,l Branch Register Equal/Unequal; the 6-byte 

BU storage register operand-1 is arithmetically 

compared to the storage register operand-2 
and the branch is made accordingly. 

3.7.6 DATA COMPARISON INSTRUCTIONS 

B E n,h,l (6) Branch word Equal; the integer stored in the 
n t 1 word addressed by operand-1 is compared 

n,d,l arithmetically (2's complement) to the 

h,n,l (6) integer stored in the word addressed by 
h hi operand-2. If an equal comparison is 

h f t,l (6) made, instruction branches to the location 
h,d,l (6) defined by operand-3. 
t,n,l 

t,h,l (6) 
t,t,l 

t,d,l (6) 
d,n,l 

d,h,l (6) 
d,t,l (6) 
d,d,l 

BU (see BE) Branch word Unequal; branch if words are 

unequal. 

BL (see BE) Branch word Low; branch if operand-1 is 

less than operand-2. 

Ble (see BE) Branch word Low or Equal; branch if 

operand-1 is less than or equal to 
operand-2. 
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BH 



BHE 



(see BE) 



(see BE) 



Branch word High; branch if operand-1 is 
greater than operand-2. 

Branch word High Equal; branch if operand-1 
is greater than or equal to operand-2. 



BDZ 



h,h,l 
t,n,l 
t,t,l 
d,n,l 
d,d,l 



Branch on Decrementing word Zero; the word 
at the location addressed by operand-1 is 
decremented by the integer at the location 
addressed by operand-2. If the result is 
zero, instruction branches to the location 
defined by operand-3. 



BDNZ 



(see BDZ) 



Branch on Decrementing word not Zero; same 
as BDZ but branch on result not zero. 



BDLZ 



(see BDZ) 



Branch on Decrementing word Less than Zero; 
same as BDZ but branch on result less than 
zero. 



BDLEZ (see BDZ) 



BDZ 



BDNZ 



t,l 

d,l 

t,l 
d.l 



Branch on Decrementing word Less than or 
Equal to Zero; same as BDZ but branch on 
result less than or equal to zero. 

Branch on Decrementing word Zero; same as 
BDZ above but decrement by one. 

Branch on Decrementing word not Zero; same 
as BDNZ above but decrement by one. 



BDLZ 



t,l 
d.l 



Branch on Decrementing word Less than Zero 
same as BDLZ above but decrement by one, 



BDLEZ 



t,l 
d,l 



All of the above data 
tion flags. 



Branch on Decrementing word Less than or 
Equal to Zero; same as BDLEZ above but 
decrement by one. 

comparison instructions set the arithmetic condi- 



3.7.7 TRANSLATE INSTRUCTIONS 



MBD 


h,r 


MBDN 


t,r 




d,r 




n,h,r 




n,t,r 




n,d,r 



Move Binary word to Decimal characters ; 
This macro generates a call to the sub- 
routine MBDSUB (MBD) or MBDNSUB (MBDN) , 
which converts from a binary integer at 
the location addressed by operand-1 to a 
string of decimal ASCII characters, stor> 
beginning from the location addressed b> 
the byte-pointer operand-2 plus one. 
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The following elements are used by the sub- 
routine and macro DO; Dl; D2 ; T4 ; T5 ; R14 ; 
R15. A minus sign will precede the con- 
verted value if it was negative; at the 
conclusion of the instruction, the byte 
pointer operand-2 addresses the last 
converted byte. MBD deletes leading zeros, 
but converts at least one character; MBDN 
converts at least "n" characters, padded 
with leading zeros if necessary. 

MDB r,t Move Decimal character to Binary word; 

r,d ASCII decimal to binary conversion. The 

word at the location addressed by operand-2 
is multiplied by 10, and a value (as 
defined above for the MXT instruction) 
from the byte addressed by the addressing 
register is added to it. The arithmetic 
condition flags are not reset, and arithme- 
tic overflow cannot be detected. 

MBX h,r Move Binary word to heXadecimal characters; 

t,r Binary to ASCII hex conversion. 

d,r This instruction assumes that the least 

significant byte of the accumulator (HO) 
has a parameter (see MBX/MBXN macro). Bits 
3-0 contain a digit count, specifying the 
maximum number of ASCII digits to be 
converted. As each digit is converted, the 
addressing register is incremented by one, 
and the converted ASCII character is stored 
in the location addressed by the addressing 
register. The format of HO at the con- 
clusion of this instruction is unpredictable, 
If the digit count in HO exceeds the field 
defined by operand-1, no operation is 
performed . 

(9) Move Binary word to heXadecimal characters; 
This macro expands as a LOAD of the first 
operand (MBX) or the first operand +X'80' 
(MBXN) , and an primitive. The MBX macro, 
therefore, causes conversion from binary 
to ASCII hex, with only significant digits 
(to a maximum of "n") converted. The MBXN 
macro causes conversion as above, but always 
converts "n" digits, with leading zeros if 
necessary. The addressing register defined 
by the third operand is incremented before 
each byte converted. 



MBX 


n,h,r 


MBXN 


n,t,r 




n,d,r 
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MXB r,h Move heXadecimal characters to Binary word; 

r,t ASCII hex to binary conversion 

r,d The field defined by operand-2 is shifted 

left 4 bits, and the value defined below, 
from the byte addressed by the addressing 
register, is added to the field: The 
4-bit value from bits 3-0 of the byte (bits 
numbered right to left) , plus nine times 
bit 5. The arithmetic condition flags are 
not reset by this instruction, and arithme- 
tic overflow cannot be detected. 

3.7.8 EXECUTION TRANSFER INSTRUCTIONS 

B 1 Branch; 

a branch to location defined, in the current 

frame, defined by label "1", or the absolute 
core address "a". The branch to an absolute 
core-address is a privileged instruction 
executable only at the monitor-level. 

BSL 1 Branch and Stack location; 

m Subroutine call to mode defined by mode-ID 

a "m"> local label "1", or absolute core- 

address "a". (The BSL to an absolute 
core-address is a privileged instruction 
executable at the monitor-level only). 
The location-1 of the instruction follow- 
ing the BSL is saved in the return stack, 
and the next instruction executed is that 
defined by the operand. The return stack 
level is increased by one; If the call 
causes the return stack level to exceed 
its maximum value, the stack pointers are 
reset to the beginning and a trap to the 
DEBUG mode is executed. 

BSLI Branch and Stack Location Indirect; 

Subroutine call indirect; this instruction 
assumes that the lower half of the 
accumulator, TO contains a mode-ID (see 
BSL* macro). The 16-bit mode-ID contained 
in TO defines the location of the next 
instruction that is to be executed, after 
the location-1 of the instruction follow- 
ing the TCI is saved in the return stack. 
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RTN 



ReTurN ; 

Return to subroutine called. The last 
entry in the return stack defines the 
location of the next instruction to be 
executed; the return stack level is 
decremented by one. If the return 
stack is empty, a trap to the DEBUG 
mode is executed. A return instruction 
from a subroutine called via a local 
call, or an absolute core-address call, 
will return within the current 512-byte 
frame only. 



ENT 



m 



ExterNal Transfer; 

Branch to location defined by mode-ID"m" 



ENTI 



ExterNal Transfer Indirect; 
Enter mode indirect: this instruction 
assumes that TO contains a 16-bit 
mode-ID (see ENT* macro) , which defines 
the next instruction to be executed. 



BSL* 



(8) Branch and Stack Location indirect; 

subroutine call to mode defined by the 
mode-ID contained in the word addressed 
by operand-1. The 16 bit mode-ID is 
loaded into the accumulator, and a BSLI 
instruction is executed. 



ENT* 



(8) ExterNal Transfer indirect; branch to 

external location defined by the mode-ID 
contained in the word addressed by 
operand-1. The 16 bit mode-ID is loaded 
into the accumulator, and an ENTI 
instruction is executed. 



3.7.9 I/O AND CONTROL INSTRUCTION 



101 



r,n 1 ,n 2 



I/O Instruction Input; this instruction 
is used to control input from peripheral 
devices whose device addresses are in 
the range through X'F' (15). This 
instruction causes an MCAL instruction 
to entry point 8 in the Monitor. 
Register r points to the start of the 
input buffer; n-^ is a 3-bit order 
code; n^ is a 4-bit device address. 
Refer to Reality CPU, peripheral I/O 
for details. 
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TOO 



READ 



r,n r n 2 



I/O instruction Output; as above this 
instruction output to peripheral, devices. 

A byte from the byte-T/O buffer in the 
PIB is stored at the loci Lion addressed 
by the addressing register. If the 
buffer is empty, or if there is data in 
the byte I/O) buffer yet to be output 
to the byte I/O device, the process 
executing the READ instruction will enter 
a quiescent state till data from the 
byte input device causes a re-activation. 



WRITE 



MCAL r,n 1 ,n 2 



The byte addressed by the addressing 
register is moved into the byte I/O 
buffer of the PIB. If the buffer is 
empty, the byte is also output immedi- 
ately to the byte I/O device. If the 
buffer is full, the process executing 
the write will enter a quiescent state 
till the byte output device has accepted 
the data from the buffer, and causes a 
re-activation. Execution of this 
instruction causes a loss of any input 
data in the byte I/O buffer, and 
inhibits any further data input from 
the byte I/O device. 

Monitor call to entry point "n2" 
(7 < n2 < 16). The word address of the 
addressing register; the 8-bit address 
of the addressing register; the 8-bit 
mask n^; and the location of the PCS 
are passed, as parameters to the moni- 
tor, in the PIB. MCAL r,5,ll sets 
CORELOCK and C0REL0CK1 bits in the 
buffer status byte indicated by 



register "r 1 



these same bits. 



MCAL r,6,ll resets 



RQM 



Process releases the remainder of its 



time quantum to the monitor. 
to: MCAL 0,0,9. 



Ecjuivaient 



IB 
OB 



r,n 



Input/Output byte instruction. Refer to 
Reality CPU, peripheral I/O for details. 
The byte defined by the mask, "n" is 
output as a control byte, and a data 
byte is input (IB) and stored at the 
location addressed by the addressing 
register, or output (OB) from the loca- 
tion addressed by the addressing regis- 
ter. These instructions are allowable 
in monitor mode only. 
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NOP 



! 'o OPeration is performed by thit 
instruction . 



HALT 



HLD 



TEXT X'01 



This instruction halts the CPU and is 
executable in the Monitor mode only., 

Halts the CPU and gates the eight-bit 
literal addressed by register r to the 
A bus, where it can be displayed in the 
least significant indicator lamps of the 
system panel by depressing the Data 
select switch. Executable in monitor 
mode only. 

Tests internal and external interrupts 
and traps to the appropriate monitor 
location if any interrupts arc pending. 
Executable in monitor mode onlv. 



ECS 



ESS 



SVP 



The status of the eight low-order 
console command switches is placed in 
the byte addressed by register r. 
Executable in monitor mode only. 

The status of the four console sense 
switches is placed in the four most 
significant bits of the byte addressed 
by register r. 

Start virtual Process (Monitor level 
only) The 2-byte FiD located at abso- 
lute core address X*127', X'128* 
(R4-FID of monitor) is treated as a 
PCB-FID, and the buffer-pool searched 
for a match. If found, register zero 
in the PCB is setup in an "attached" 
format, and the attachment process for 
register one (user program-mode regis- 
ter) is started. If not found, a frame 
fault request on the PCB-FID is stacked, 
and the monitor Is re-entered. 



RVP 



Return to Virtual Process (monitor 
level only) should be executed when a 
trap to the monitor due to an external 
interrupt by devices O-X'15' has caused 
a monitor trap. Selects primary file 
registers of the 1600 computer and 
resumes execution of the virtual 
Process. If this instruction is exe- 
cuted when the system is not in an 
interrupt-handling mode, no operation 
takes place. 



3 - 2 6 



5.7.10 ASSEMBLER DIRECTIVES 



ADDR 



n,n 



AR 


1 




r 




n 


CHR 


1 


HTLY 


n 


TLY 




DTLY 




SR 





CMNT 



Defines the local symbol "1" as a storage 
register in unlinked format. The displacement 
is defined by the first operand. The FID is 
defined by the second operand. 

Defines the local symbol "1" as an address 
register with a value defined by the operand. 



Defines the local symbol "1" (if present) as 
a character (CHR) half-word (HTLY) , word (TLY) , 
double-word (DTLY) or S/R (SR) respectively; 
object code of the appropriate length and 
value defined by the operand is assembled, 
except for the SR op code, which ignores the 
operand field. 

Comment; the contents of this statement are 
treated as commentary, and ignored by the 
assembler. Note: A label field entry is 
allowable. 



1 


DEFA 


a 


1 


DEFM 


r,l 

r,n 
n,l 
n,n 


1 


DEFk 


r,l 
r,n 

n,l 
n,n 

r,*[string] 
n,*[string] 



Defines the local symbol "1" to be of type a. 

Defines the local symbol "1" to be of type m; 
a mode-ID with entry point defined by the 
first operand and FID defined by the second 
operand. 

Defines the local symbol "1" to be of type "k" 
(where k=b ,c,d,h,l,s, t) , with base register 
defined by the first operand and displacement 
defined by the second operand. 

When the assembler location counter "*" is 
used as the second operand, an optional string 
can be used, with the following format: 

string * n 2 [±n„] or string » ±n 

If n2 is specified after the *, instructions 
referencing 1 will obtain a displacement (D 
field) appropriate for an operand length of 
n2 bits. Values of n2 * 1,8, and 16 are valid, 
with a default of n£ * 8. 

If -H13 is specified after the *n, the effective 
displacement will be adjusted n3 bits, bytes 
or double-bytes, depending on whether n2 - 1,8 
or 16. 
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Example : 

ORG 10 

LABEL1 DEFT 1,*16 

STORE LABEL1 



Example : 



produces the object code A.10559 
corresponding to the instruction: 



opcode-1 register 



D 



L opcode-2 



1010 


0001 


00000101 


01 


011001 



with a displacement (D field) of 5 words 
relative to the byte addressed by 
register 1. 



LABEL2 



ORG 

DEFB 

SB 



1 

l,*l+7 

LABEL2 



produces the object code 810F correspond- 
ing to the instruction. 



EQU 



opcode register 



D 



1000 



0001 



00001111 



with a displacement of 15 bits relative 
to the byte addressed by register 1. 

Equates the local label "1" to the symbol 
or literal value of the operand. 



FRAME n 



Must be the first assembled statement in 
a mode that is to be loaded; M n" defines 
the frame on which the object code is to 
be loaded. 



ORG 



SETAR r 



Resets the location counter to value 
defined by the operand. This statement 
may have a label field entry. 

Causes all literals encountered from this 
point in the assembly to be defined as a 
displacement relative to register r. If no 
SETAR occurs, SETAR 1 is assumed. 
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TEXT X'...' Assembles binary equivalent of character 
C' . . . ' strings (enclosed in quotes and preceded 
by a 'C') or hexadecimal values. Any 
number and combination of C and X literals 
separated by commas is permitted. 



3.7.11 ADDRESS REGISTER USAGE 

A storage operand is always referenced through an address register 
containing the byte address of the operand. For instructions with a 
D field, a displacement is added to the contents of the address 
register to form an effective address. The length of the operand is 
encoded in the L field of the instruction. (Refer to Section 2.5.) 

For REAL instructions allowing an address register r in the operand 
field, the displacement relative to the register and the operand length 
can be specified using the following formats: 

Displacement Relative Operand 

Fo rma t to Addre ss Re gister n Le ngth 

1 byte 

1 bit 

1 byte 



2 bytes 

•4 byres 
6 bytes 



Rn 








bytes 


Rn;Bra 








m bits 


Rn;Cm 








m bytes 


Rn;Hm 








m bytes 


Rn;Tm 








2*ra bytes 


Rn;Dm 








4*m bytes 


Rn;Sm 








6*m bytes 


Ex ampl e : 










MCC 


RO; 


;C15. 


,R15 


Move low order t 



to the byte addressed by R15. 

E x amp 1 e : 

SB R5;B0 Set bit of the byte addressed by R5. 

Example : 

MOV MBASE,R10;D4 Move double-word MBASE to the double-word 

starting 16 bytes past the byte addressed 
by RIO. 



3-29 



3.7.12 REAL INSTRUCTION SIDE EEEECTS 

Many of the REAL op-codes use functional elements not specified as 
operands for execution. Those instructions are so footnoted in the 
previous listing; the following explanation of the various footnotes 
describes the state of these implied elements at the conclusion of 
instruction execution: 

(1) R15 points to byte addressed by operand-2. 

(2) R14 points to byte addressed by operand-1, R15 points to 
byte addressed by operand-2. 

(3) R15 points to byte addressed by operand-1. 

(4) R15 points one prior to last byte moved and TO contains 
numoer of bytes moved into last frame. 

(5) Contents of TO are unpredictable. 

(6) DO contains the integer moved or compared. 

(7) SYSRO contains the byte pointer operand-1. 

(8) TO contains the 16-bit mode-ID; Tl is zero. 

(9) HO contains the number of digits converted into the last 
frame, if its high order bit (BO) is set; otherwise original 
val je . 

(10) See Appendix A. 



3.7.13 EXAMPLES 

The following listing presents examples of the REAL instruc 
t i o n s . 
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MODE: REAL- INSTRUCTIONS PAGE 1 10 :0^+: 01 05 AUG 1974 

001 ***************************************************************** 

002 * 

003 * REAL INSTRUCTION REPERTOIRE 

004 * 

005 ************************************************************************ 

006 * 

007 * DEFINE SYMBOLIC OPERANDS USED IN DEFINITIONS 

008 * 

009 Bl DEFB 1,11 

010 B2 DEFB 2,22 

011 CI DEFC 1,11 

012 C2 DEFC 2,22 

013 HI DEFH 1,11 

014 H2 DEFH 2,22 

015 Tl DEFT 1,11 

016 T2 DEFT 2,22 
Y 1 017 Dl DEFD 1,11 
w 018 D2 DEFD 2,22 
^ 019 SI DEFS 1,11 

020 S2 DEFS 2,22 

021 * 

022 * DEFINE FUNCTIONAL ELEMENTS USED IN MACRO EXPANSIONS 

023 * 

024 TO DEFT 0,7 

025 D0 DEFD 0,6 

026 Al DEFA X'1234' 

027 Ml DEFM 1,2 

028 * 

029 * 

030 * 

031 ************************************* ******** ********************** 

032 * 

033 * CHARACTER OPERATIONS 

034 * 

035 ***************?** ************ ************* ****************** ****** 






MCC 


C'A ? ,R2 


MCC 


CA',S2 


MCC 


C1,C2 


MCC 


C1,R2 


MCC 


C1,S2 


MCC 


R1,C2 


MCC 


R1,R2 


MCC 


R1,S2 



MODE: REAL- INSTRUCT IONS PAGE 2 10:04:03 05 AUG 1974 

036 * MOVE CHARACTER TO CHARACTER 

037 L00 EQU * 

038 001 E2163F MCC C'A',C2 ONE CHARACTER MOVED 
004 4F4120 

039 007 424120 

040 00A E216EF 
00D 4F4120 

041 * 

042 010 F216010B 

043 014 D10B12 

044 017 E216EF 
01A D10B1F 

045 * 

046 01D D21601 

047 020 6219 

048 022 E216EF 
025 6F19 

049 * 

050 027 E2163E MCC S1,C2 
02A E10BEF 
02D 6EF9 

051 02F E10BEF MCC S1,R2 
032 62F9 

052 034 E10BEE MCC S1,S2 
037 E216EF 
03A 6F39 

053 * 

054 * MOVE CHARACTER TO CHARACTER, INCREMENTING DESTINATION 

055 03C 424140 MCI C f A',R2 ONE CHARACTER MOVED 

056 03F A21643 MCi C ! A ! ,S2 
042 E216EF 
045 4F4120 

057 * 

058 048 32 MCI C1,R2 
049 D10B12 



MODE: real- instructions 



PAGE 3 



10:04:04 05 AUG 1974 





059 04C E216EF 






04F 3F 






050 D10B1F 






053 E216DF 






060 


* 




061 056 621A 






062 058 E216EF 






05B 6F1A 






05D E216DF 






063 


* 




064 060 E10BEF 






063 62FA 






065 06j E10BEE 






068 E216EE 






068 6FEA 






06D E216DF 




UA 


066 


* 


1 


067 


* 


<LM 


056 070 162F 
072 424140 
075 A72E58 
078 6F24 

069 07A A10B18 
07D A00685 
080 162F 
082 424140 
085 6F24 

070 087 A10B58 
08A A00685 
08D 162F 
08F 424140 
092 6F24 

071 094 A10B98 
097 A00685 
09A 162F 





MCI C1,S2 



MCI R1,R2 
MCI R1,S2 



MCI S1,R2 
MCI S1,S2 



MCI 



C'A',R2,7 



MCI C f A',R2,Hl 



MCI C'A\R2,T1 



MCI C f A f ,R2,Dl 



MOVE # CHARACTERS IN OPERAND 3 



MODE: REAL- INSTRUCT IONS PAGE 4 10:04:04 05 AUG 1974 





09C 


424140 












09F 


6F24 










072 






* 








073 






* MOVE 


CHARACT 


ER TO CHARACTER 


INCREMENTING SOURCE 


074 


0A1 
0A2 


31 
D21601 




MIC 


R1,C2 


MOVE 1 CHARACTER 


075 


0A5 


6121 




MIC 


R1,R2 




076 


0A7 
0AA 


S216EF 
61F1 




MIC 


K i , b l 




077 






* 








078 


0AC 
0AF 
0B2 
0B5 


A10B43 
E2163E 
E10BEF 
6EF9 




MIC 


S1,C2 




079 


0B7 


E10BEF 




MIC 


S1,R2 




C^J 


0BA 


6F21 










>4 


0BC 


E10BDF 










^ 080 


0BF 
0C2 
0C5 
0C7 


E10BEF 
E216EE 
6FE1 
E10BDF 




MIC 


S1,S2 




081 






* 








082 






* MOVE 


CHARACT 


ER TO CHARACTER, 


INC SOURCE AND DEST 


083 


0CA 


6122 




Mil 


R1,R2 


MOVE 1 CHARACTER 


084 


0CC 
0CF 
0D1 


E216EF 

61F2 

E216DF 




Mil 


R1,S? 




085 






* 








V w \J 


0D7 
0D9 


PI flRFF 

6F22 

E10BDF 




MI I 


S 1 ^ R 2 




087 


0DC 
0DF 
0E2 
0E4 


E10BEE 
E216EF 
6EF2 

E10BDE 




Mil 


S1,S2 
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088 






089 


0EA A72F58 




0ED 


6124 


090 


0EF A10B18 




0F2 


6124 


091 


0F4 A10B58 




0F7 


6124 


092 


0F9 


A10B98 




0FC 


6124 


093 






094 


0FE 


163F 




100 


6123 


095 


102 


E24FEF 




105 


6123 


096 






w 097 






^ 098 


107 


6120E0 


01 099 






100 


10A 6108A0 


101 






102 


10D 


6124 


103 






104 


10F 


6123 


105 






106 






107 


111 


E10B3E 




114 


E2163F 




117 


6EF7 


108 


119 


E10B3F 




11C 


6F27 


109 


he 


E10B3E 




121 


E216EF 




124 


6EF7 


110 







Mil 
Mil 
Mil 
Mil 

Mil 

Mil 



R1,R2,80 
R1,R2,H1 
R1,R2,T1 
R1,R2,D1 

R1,R2,R3 
R1,R2,S3 
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MOVE # CHARACTERS IN OPERAND 3 



MOVE UNTIL 2ND OPERAND = 3RD OPERAND 



* INSTRUCTIONS INCREMENTING SOURCE & DESTINATION REPEATEDLY 

MUD R1^R2 / X , E0' MOVE CHAR TO CHAR THROUGH DELIMITER 



SCD R1,,X : A0' 

MI IT R1,R2 
* 

MIIR Ri,R2 

♦EXCHANGE CHARACTER WITH CHARACTER 

XCC 01,02 

XCC C1,R2 

XCC C1.S2 



SCAN CHARACTERS TO DEL I METER 

MOVE NUMBER OF CHARS. IN ACCUMULATOR 

.MOVE UNTIL Rl AND R15 ARE EQUAL 
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111 


126 


E2163F 




129 


6F17 


112 


12B 


6127 


113 


12D 


E216EF 




130 


61F7 


114 






115 


132 


E10BEE 




135 


E2163F 




138 


6EF7 


116 


13A 


E10BEF 




13D 


6F27 


117 


13F 


E10BEE 




142 


E216EF 




145 


6EF7 


118 






119 






120 


147 


E10B3F 


s ! 


14A 


4FABC0 


121 


14D 


41ABC0 


122 


150 


E10BEF 




153 


4FABC0 


123 






124 






125 


156 


E10B3F 




159 


4FABD0 


i fy r 

1ZD 


15C 


41ABD0 


127 


15F 


E10BEF 




162 


4FABD0 


128 






129 






130 


165 


E10B3F 




168 


4FABE0 


131 


168 


41ABE0 


132 


16E 


E10BEF 




171 


4FABE0 



XCC R1,C2 

XCC R1,R2 
XCC R1,S2 



XCC S1,C2 

XCC S1,R2 
XCC S1,S2 



^LOGICAL OR CHARACTER WITH MASK 
OR C^X'AB' 

OR R1,X , AB I 
OR S1,X'AB' 



^EXCLUSIVE OR WITH MASK 
XOR CljX'AB' 



XOR S1,X'AB 



*LuGICAL AND CHAKACltK WIIH MASK 
AND C1,X'AB' 

AND R1,X'AB T 
AND S1 / X I AB* 
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Isi 






133 




* 








134 




* 








135 174 


41FEF0 






SHIFT 


X'FE ! ,R1 


136 




* 








137 




* 








138 




* 








139 




* 








140 




*************************************** 


141 




* 








142 




* 


CHARACTER INSTRUCTIONS (TESTS) 


143 




* 








144 




*************************************** 


145 




* 








146 




* 








147 




*BRANCH 


CHARACTER EQUAL 


148 177 


E2163F 






BCE 


C'A',C2,L1 


17A 


4F410847 










149 17E 


42410843 






BCE 


C'A\R2,L1 


150 




* 








151 182 


E10B3F 










185 


4F41083C 










152 189 


F10B1216 






BCE 


C1,C2,L1 


18D 


5836 










153 l&F B10B2832 






BCE 


C1,R2,L1 


154 




* 








155 193 


4141082E 






BCE 


4l,C'A f , LI 


156 197 


B216182A 






BCE 


R1,C2,L1 


157 19B 


512827 






BCE 


R1,R2,L1 


158 




* 








159 




*BRANCH 


CHARACTER UNEQUAL 


160 19E E2163F 






BCU 


C , A , ,C2,L1 


1A1 


4F410020 










161 1A5 


4241001C 






BCU 


C'A' / R2 / L1 


162 1A9 


E10B3F 






BCU 


Cl,C f A',Ll 


1AC 


4F410015 
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oo 



163 






164 


1B0 


F10B1216 




1B4 


500F 


165 


1B6 


B10B200B 


166 






167 


1BA 


41410007 


168 


1BE 


B2161003 


169 


1C2 


512000 


170 






171 






172 






173 


105 


E2163F 




1C8 


4F410607 


17<4 


ICC 


4241060B 


175 


1D0 


E10B3F 




1D3 


4F410C02 




1D7 


1E14 


176 


1D9 


F10B1216 




1DD 


561A 


177 


IDF 


B10B261E 


178 


1E3 


41410C02 




1E7 


1E24 


179 


1E9 


B2161C19 




1ED 


1E2A 


180 


1EF 


51262D 


181 






182 






183 


1F2 


E2163F 




1F5 


4F410E34 


i n i. 
JLOH 


1F9 


1 . r\ 1 . 1 rti r r> 


185 


1FD 


E10B3F 




200 


4F410402 




204 


1E41 


186 


206 


F10B1216 




20A 


5247 



BCU C1,C2,L1 

BCU C1,R2,L1 

BCU Rl,C f A',Ll 

BCU R1,C2,L1 

BCU R1,R2,L1 
* 

*BRANCH CHARACTER LOW 

LI EQU * 

BCL C'A',C2,L1 

BCL C'A',R2,L1 

BCL C1,C'A',L1 

BCL C1,C2,L1 

BCL C1,R2,L1 

BCL R1,C'A',L1 

BCL R1,C2,L1 

BCL R1,R2,L1 

*BRANCH CHARACTER LOW OR EQUAL 

BCLE C'A' / C2,L1 



BCLE C1,C'A',L1 
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187 


20C 


B10B2E4B 


BCLE 


C1,R2,L1 




188 


210 
214 


41410402 
1E51 


BCLE 


Rl,C'A f ,Ll 




189 


216 
21A 


B2161402 
1E57 


BCLE 


R1,C2,L1- 




190 


21C 


512E5A 


BCLE 


R1,R2,L1 




191 






* 






192 






*BRANCH CHARACTER GREATER 




193 


21F 
222 
226 


E2163F 

4F410C02 

1E63 


BOH 


C T A ! ,C2,L1 




194 


228 
22C 


42410C02 
1E69 


BCH 


C'A\R2,L1 




195 


22E 
231 


310B3F 
4F410670 


BCH 


Cl,C'A f ,Ll 


Osl 


196 


235 
239 


F216110B 
5676 


BCH 


C1,C2,L1 


1 


197 


23B B10B2C16 


BCH 


C1,R2^L1 


ID 




23F 


1E7C 








198 


241 


41410680 


BCH 


R1,C ! A',L1 




199 


245 


B2161684 


BCH 


R1,C2,L1 




200 


249 


521687 


BCH 


R1,R2,L1 




201 






* 






202 






*BRANCH CHARACTER GREATER < 




203 


24C 
24F 
253 


E2163F 

4F410402 

1E90 


BCHE 


C ! A',C2,L1 




204 


255 
259 


42410402 
1E96 


BCHE 


C , A t / R2,Ll 




205 


25B E10B3F 


BCHE 


Cl,C f A f ,Ll 






25E 


4F410E9D 








206 


262 
266 


F216110B 
5EA3 


BCHE 


C1,C2,L1 




207 


268 
26C 


B10B2402 
1EA9 


BCHE 


C1,R2,L1 
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i 



208 26E 41410EAD 

209 272 B2161EB1 

210 276 521EB4 
211 

212 279 413A0C04 
27D 41300EBC 

213 281 41470C0C 
285 4I410EC4 
289 413A0C04 
28D 41300ECC 

214 291 415B0C04 
295 41410ED4 

215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 

226 299 810B 

227 298 710B 

228 29D 910B0000 

229 2A1 910B0A04 
230 

231 
232 
233 
234 
235 
236 
237 



BCHE R1,C'A',L1 

BCHE R1,C2,L1 

BCHE R1,R2,L1 

^CHARACTER TYPE TESTS 

BCN R1,L1 

BCX R1,L1 



BCA R1,L1 



BRANCH CHARACTER NUMERIC 
BRANCH CHARACTER HEXADECIMAL 

BRANCH CHARACTER ALPHABETIC 



********************************************** 

* BIT INSTRUCTIONS 

**** ************************** **************** 

* 

* 

* 

* 

SET BIT 
ZERO BIT 
BRANCH BIT SET 

|_Lf P.P.7 P. 1 ! U RPAMTH RTT 7PPO 

* 

CMNT * SEE MOV BIT TO BIT BELOW 

********************************************** 

* 

* DATA MOVEMENT AND ARITHMETIC INSTRUCTIONS 
* 

********************************************** 
* 



SB 


Bl 


ZB 


Bl 


BBS 


B1,L4 


RR7 


pi i h 
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238 


*MOVE 


DATA TO 


DATA BY AREA 


239 2A5 A73058 






MOV 


32, H2 


2A8 A21619 










240 2AB F2164730 






MOV 


32, T2 


2m 2AF F2168744 






MOV 


32, D2 


242 


* 








243 2B3 F216010B 






MOV 


H1,H2 


244 2B7 A10B18 






MOV 


H1,T2 


2BA A21659 










245 2BD A10B18 






MOV 


H1,D2 


2C0 A21699 










246 


* 








247 2C3 A10B58 






MOV 


T1,H2 


2C6 A21619 










248 2C9 F216410B 






MOV 


T1,T2 


249 2CD A10B58 






MOV 


T1,D2 


2D0 A21699 










250 


* 








251 2D3 A10B98 






MOV 


D1,H2 


2D6 A21619 










252 2D9 A10B98 






MOV 


D1,T2 


2DC A21659 










253 2DF F216810B 






MOV 


D1,D2 


254 


* 








255 2E3 7216 






MOV 


B1,B2 


2E5 910B0802 










2E9 8216 










256 


* 








257 


*TEST 


AND 


SET 


ARITHMETIC FLAGS 


258 2EB A10B02 






TST 


HI 


259 2EE A10B42 






TST 


Tl 


260 2F1 A10B82 






TST 


Dl 


261 


* 








262 


* 








263 


* INCREMENT INSTRUCTIONS 



MOVE BIT TO BIT 



MODE: REAL- INSTRUCTIONS 



264 2F4 


A10B03 




INC 


HI 


265 2F7 


A10B43 




INC 


Tl 


266 2FA A10B83 




INC 


Dl 


267 




* 






268 2FD 


A10B18 




INC 


HI, 32 


300 


A73053 








303 


A10B19 








zoy ^ior. 


ripazz id 




INC 


HI, H2 


270 30A A10B18 




INC 


H1,T2 


30D 


A21653 








310 


A10B19 








271 313 


A10B18 




INC 


H1,D2 


316 


A21693 








319 


A10B19 








272 




* 






273 31C 


F10B6730 




INC 


Tl,32 


274 320 


A21618 




INC 


T1,H2 


323 


F10B6007 








275 327 


F10B6216 




INC 


T1,T2 


276 32B 


A21698 




INC 


T1,D2 


32E 


F10B6007 








277 




* 






278 332 


F10BA744 




INC 


Dl,32 


279 336 


A21618 




INC 


D1,H2 


339 


F10BA006 








280 33D 


A2A658 




INC 


D1,T2 


340 


F10BA006 








281 344 


F10BA216 




INC 


D1,D2 


282 




* 






283 




^DECREMENT INSTRUCTIONS 


284 348 


A10B05 




DEC 


HI 


285 348 


A10B45 




DEC 


Tl 


2 86 34F 


A10R8S 




DEC 


Dl 


287 










288 351 


A10B18 




DEC 


HI, 32 
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INCREMENT DATA BY 1 

INCREMENT DATA AREA BY DATA 



DECREMENT DATA AREA BY 1 



DECREMENT DATA AREA BY DATA 
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354 A73055 












357 A10B19 










289 


35A F10B3216 




DEC 


H1,H2 




290 


35E A10B18 
361 A21655 
364 A10819 




DEC 


H1,T2 




291 


367 A10B18 
36A A21695 
36D A10B19 




DEC 


H1,D2 




292 




* 








293 


370 F10B7730 




DEC 


Tl,32 




294 


374 A21618 
377 F10B7007 




DEC 


T1,H2 




295 


378 B10B7216 




DEC 


T1,T2 




296 


37F A21698 
382 F10B7007 




DEC 


T1,D2 




'? 297 




* 








** 298 


386 F10BB744 




DEC 


Dl,32 




w 299 


38A A21618 
38D F10BB006 




DEC 


D1,H2 




300 


391 A21658 
394 F10BB006 




DEC 


D1,T2 




301 


398 F10BB216 




DEC 


D1,D2 




302 




* 








303 




*ZERO OUT DATA 


AREA 




304 39C A10B00 




ZERO 


HI 




305 


39F A10B40 




ZERO 


Tl 




306 


3A2 A10B80 




ZERO 


Dl 




307 




*REPLACE 


DATA AREA WITH NUMBER 


1 


308 


3A5 A10B01 




ONE 


HI 




309 


3A8 A10B41 




ONE 


Tl 




310 


3AB A10B81 




ONE 


Dl 




311 




*NEGATE DATA AREA 




312 


3AE A10B08 




NEG 


HI 




313 


3B1 A10B48 




NEG 


Tl 





MODE: REAL- INSTRUCTIONS 



314 


3B4 


A10B88 


315 






316 


3B7 


A73C58 


317 


3BA A10B18 


318 


3BD 


A10B58 


319 


3C0 


A10B98 


320 






xo 1 




Almoin 


322 


3C6 


A10B59 


323 


3C9 


A10B99 


324 






325 


3CC 


A74653 


326 


3CF 


A10B13 


327 


3D2 


A10B53 


328 


3D5 


A10B93 


329 






330 


3D8 


A74755 


S 331 


3DB 


A10B15 


332 


3DE 


A10B55 


333 


3E1 


A10B95 


334 






335 


3E4 


A73A50 


336 


3E7 


A10B10 


337 


3EA 


A10B50 


338 


3ED 


A10B90 


339 






340 


3F0 


A73151 


341 


3F3 


A10B11 


342 


3F6 


A10B51 


343 


3F9 


A10B91 


344 






71. r 






346 






347 






348 







"IONS 
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NEG 


Dl 


*LOAD DATA INTO 


ACCUMULATOR 


LOAD 


876 


LOAD 


HI 


LOAD 


Tl 


LOAD 


Dl 


*STORE ACCUMULATOR INTO DATA AR! 


CTrvncr 


U 1 

1 1 1. 


STORE 


Tl 


STORE 


Dl 


*ADD DATA TO ACCUMULATOR 


ADD 


6547 


ADD 


HI 


ADD 


Tl 


ADD 


Dl 


^SUBTRACT DATA 


FROM ACCUMULATOR 


SUB 


643 


SUB 


HI 


SUB 


Tl 


SUB 


Dl 


^MULTIPLY ACCUMULATOR BY DATA 


MUL 


23 


MUL 


HI 


MUL 


Tl 


MUL 


Dl 


*DIVIDE ACCUMULATOR BY DATA 


DIV 


23 


DIV 


HI 


DIV 


Tl 


DIV 


Dl 
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349 




****************************************** 


350 




* 








351 




*MOV REGISTER 


TO REGISTER 




352 


3FC 1612 




MOV 


R1,R2 




353 


3FE E216D1 




MOV 


R1,S2 




354 


401 E10BE2 




MOV 


S1,R2 




355 


404 F216C10B 




MOV 


S1,S2 




356 




*EXCHANGE 


REGISTER CONTENTS 




357 


408 1712 




XRR 


R1,R2 




358 


40A E10BEF 
40D E10BD1 
410 16F1 




XRR 


R1,S1 




359 


412 161F 
414 E10BE1 
417 E10BDF 




XRR 


S1,R1 




360 


41A E216EF 




XRR 


S1,S2 




Lri 


41D F216C10B 










i 


421 E10BDF 










<" 361 




* INCREMENT REGISTER 




362 


424 31 




INC 


Rl 


BY 1 


363 


R25 A10B43 




INC 


SI 




364 


428 E73251 




INC 


Rl,20 


BY 2ND 01 


365 


42B A10B18 
42E E00751 




INC 


R1,H1 




366 


431 E10B51 




INC 


R1,T1 




367 


434 A10B98 
437 E00751 




INC 


R1,D1 




368 




* 








369 


43A F10B6732 




INC 


SI, 20 




370 


43E A10B18 
441 F10B6007 




INC 


S1,H1 




371 


445 F10B610B 




INC 


S1,T1 




372 


449 A10B98 
44C F10B6007 




INC 


S1,D1 




373 




*DECREMENT REGISTER 
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374 450 


21 




DEC 


Rl 


375 451 


A10B45 




DEC 


SI 


376 




* 






377 454 


E74841 




DEC 


Rl,25 


378 457 


A10B18 




DEC 


R1,H1 


45A E00741 








379 45D 


E10B41 




DEC 


R1,T1 


380 460 


Ai0b98 




DEC 


R 1 , D 1 


463 


E00741 








381 466 


F10B7749 




DEC 


SI, 1000 


382 46A A10B18 




DEC 


Si, HI 


46D 


F10B7007 








383 471 


F10B710B 




DEC 


S1,T1 


384 475 


A10B98 




DEC 


S1,D1 


478 


F10B7007 








385 




* 






386 




*LOAD 


ABSOLUTE 


ADDRESS DIFFERENCE 


387 




L2 


EQU 


* 


388 47C 


E0F6D1 




LAD 


R1,R2 


<+7F 


E0F6C2 








389 *+82 


E216C1 




LAD 


R1,S2 


390 485 


E10BC2 




LAD 


S1,R2 


391 488 


E216EF 




LAD 


S1,S2 


48B 


E10BCF 








392 




*SET 1 


REGISTER ' 


TO ADDRESS 


393 48E 


E21631 




SRA 


R1,C2 


394 491 


E21631 




SRA 


R1,H2 


395 494 


E21671 




SRA 


R1,T2 


395 uqi 


E216B1 




SRA 


R1,D2 


397 49A 


E216F1 




SRA 


R1,S2 


398 49D 


E10131 




SRA 


R1,L00 


399 




*f-LAG 


AND ATTACH ADDRESS REGISTER 


400 4A0 


423460 




FAR 


R?. X' 34' 


401 




*BRANCH REGISTER EQUAL (UNEQUAL) 


402 




L3 


EQU 


* 



BY 1 



BY 2ND OPERANl 



On) 
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403 4A3 E0F9D1 
4A6 C0F92A07 

404 4AA C2161A0B 

405 4AE F216D10B 
4B2 5A11 

416 4B4 E0F9D1 
4B7 CIF92218 

407 4BB C216121C 

408 4BF C10B2220 

409 4C3 C10B2A24 

410 4C7 F216D10B 
4CB 522A 

411 
412 
413 
414 
415 
416 
417 
418 
419 
420 

421 4CD E10B3F 
4D0 4F190949 

422 4D4 F733510B 
4D8 5943 

423 4DA F734910B 
4DE 59 3D 

424 

425 4E0 A10B18 
423 F0075736 
4E7 5934 

426 4E9 F10B110B 
4ED 592E 

427 4EF A10B18 
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BE 


R1,R2,L3 


BE 


R1,S2,L3 


BE 


S1,S2,L3 


BU 


R1,R2,L3 


BU 


R1,S2,L3 


BU 


S1,R2,L3 


BE 


S1,R2,L3 


BU 


S1,S2,L3 
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* 
* 
* 

********************************************** 
* 

* DATA COMPARISON INSTRUCTIONS 
* 

********************************************** 
* 

*BRANCH 1ST OPERAND = 2ND OPERAND 
BE 25,H1,L6 



BE 


26,T1,L6 


BE 


27,D1,L6 


BE 


Hl,X'25 f ,L6 


BE 


H1,H1,L6 


BE 


H1,T1,L6 



MODE: REAL- INSTRUCTIONS PAGE 18 10:04:15 5 AUG 1974 



BE H1,D1,L6 

BE Tl, 12345, L6 

BE T1,H1,L6 

BE T1,T2,L6 

BE T1,D1,L6 





4F2 


F0075108 




4F6 


5925 


428 


4F8 


A10B18 




4FB 


F006910B 




4FF 


591C 


429 






^30 


501 


F10B573D 




*s u --' 


/_/.*- v., 


431 


507 


A10B18 




50A 


F10B5007 




50E 


590D 


432 


510 


F10B5216 




514 


5907 


433 


516 


A10B58 




519 


F006910B 


^ 


51D 


58FE 


^ ^34 






oo L135 


51F 


F10B974A 




523 


58F8 


436 


525 


A10B18 




528 


F10B9006 




52C 


58EF 


437 


52E 


A10B58 




531 


F10B9006 




535 


58E6 


438 


537 


F10B9216 




53B 


58E0 


439 






440 






441 


53D 


E10B3F 




540 


4F1900D9 


442 


544 


P777 C 1 flp 
1 1 J J J J- V *-> 




548 


50D3 


443 


54A 


F734910B 




54E 


50CD 



BE 


D1,X'1234 ! 


,L6 


BE 


D1,H1,I_6 




BE 


D1,51,L6 




BE 


D1,D2,L6 





* 

*BRANCH 1ST OPERAND NOT EQUAL SECOND OPERAND 
BU 25,Hl,l_6 

P. ! I 9 A T 1 I A 

BU 27,D1,L6 



mode: real- instruct ions 


444 


* 


445 


550 A10B18 




553 F0075736 




557 50C4 


446 


559 F10B110B 




55D 50BE 


447 


55F A10B18 




562 F007510B 




566 50B5 


448 


568 A10B18 




56B F006910B 




56F 50AC 


449 


* 


450 


571 F10B573D 




575 50A6 


451 


577 A10B18 


CM 

i 


57A F10B5007 


■£» 


57E 509D 


^ 452 


580 F10B5216 




584 5097 


453 


586 A10B58 




589 5006910B 




58D 508E 


454 


* 


455 


58F F10B974A 




593 5088 


456 


595 A10B18 




598 F10B9006 




59C 507F 


457 


59E A10B58 




5A1 F10B9006 




5A5 5076 


458 


5A7 F10B9216 




5AB 5070 


459 


* 
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BU 


Hl,X'25 f ,L6 


BU 


H1,H1,I_6 


BU 


H1,T1,L6 
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BU H1,D1,L6 



BU 


Tl, 12345, Ld 


BU 


T1,H1,L6 


BU 


T1,T2,L6 


BU 


T1,D1,L6 


BU 


Dl,X f 1234 f ,L6 


BU 


D1,H1,L6 


BU 


01,11,16 


BU 


D1,D2,L6 
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*8RANCH 1ST ^F L -Vv :■"'. ?'j • OPERAND 



460 






461 


5AD 


E10B3F 




5B0 


4F190469 


462 


5B4 


F7335103 




5B8 


5463 


463 


5BA 


F734910B 




4BE 


545D 


464 






465 


5C0 


A10B18 




5C3 


F0075736 




5C7 


5454 


466 


5C9 


F10B110B 




5 CD 


544E 


467 


5CF 


A10B18 




5D2 


F007510B 




5D6 


5445 


'" J 468 


5D8 


A10B18 


o 


5D8 


F006910B 




5DF 


543C 


469 






470 


5E1 


F10B573D 




5E5 


5436 


471 


5E7 


A10B18 




5EA 


F10B5007 




5EE 


542D 


472 


5F0 


F10B5216 




5F4 


5427 


473 


5F6 


A10B58 




5F9 


F006910B 




5FD 


541E 


474 






475 


5FF 


F10B974A 




603 


5418 


476 


r ri ,- 

Dk3D 


A10B18 




608 


F10B9006 



BL 


25, h 




BL 


2 6, 


. . 6 


BL 


27, D 


:,L6 



BL H1,X 



I - CI I c 



BL 


H1,M1,L6 


BL 


H1,T1,L6 


BL 


H1,D1,L6 



BL Tl, 12345, Lb 

BL T1,H1,L6 

BL T1,T2,L6 

BL Tl,Dl,L6 

BL D1,X'1234',L6 
BL 
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BL D1,T1,L6 
BL D1,D2,L6 



EQU * 
*BRANCH 1ST OPERAND LESS OR EQUAL 2ND OPERAND 
BLE 25,H1,L6 





60C 


540F 


477 


60E A10B58 




611 


F10B9006 




615 


5406 


478 


617 


F10B9216 




61B 


5400 


479 




* 


480 




L6 


481 




*B, 


482 


61D 


310B3F 




620 


4F190E07 


483 


624 


F733510B 




628 


5E0D 


484 


62A 


F734910B 




62E 


5E13 


485 




* 


u. 486 


630 A10B18 


Ln 


633 


F0075736 


M 


637 


5E1C 


487 


639 


F10B110B 




63D 


5E22 


488 


63F A10B18 




642 


F007510B 




646 


5E2B 


489 


648 


A10B18 




64B F006910B 




64F 


5E34 


490 




* 


491 


651 


F10B573D 




655 


5E3A 


492 


657 A10B18 




65A F10B5007 




65E 


5E43 


493 


650 


F10B5216 




664 


5E49 



BLE 


26,T1,L6 


BLE 


27, D1,L6 


BLE 


Hi,x»25 f ,L6 


BLE 


H1,H1,L6 


BLE 


H1,T1,L6 



BLE H1,D1,L6 

BLE Tl, 12345, L6 

BLE 51,H1,L6 

BLE T1,T2,L6 
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BLE T1,D1,L6 



494 


666 


A10B58 




669 


F006910B 




66D 


5E52 


495 






496 


66F 


F10B974A 




673 


5E58 


497 


675 


A10B18 




678 


F10B9006 




67C 


5E61 


498 


67E 


A10B58 




681 


F10B9006 




685 


5E6A 


499 


687 


F10B9216 




68B 


5E70 


500 






J, 5 ^ 






^ 502 


68D 


A10B18 




690 


F0075748 




694 


5679 


503 


697 


F10B5733 




69A 


567F 


504 


69C 


F10B9734 




6A0 


5685 


505 






506 


6A2 


E10B3F 




6A5 


4F25068C 


507 


6A9 


F10B110B 




6AD 


5692 


508 


6AF 


A10B18 




6B2 


F10B5007 




6B6 


569B 


509 


6B8 


A10B18 




6BB 


F10B9006 




6BF 


56A4 


510 







BLE 


Dl^X'12 34 


',L6 


BLE 


Dl,Hl,Lb 




BLE 


D1,T1,L6 




BLE 


D1,D2,L6 





*BRANCH 1ST OPERAND GREATER THAN 2ND OPERAND 
BH 25,H1,L6 



BH 


26,T1 > 1_6 


BH 


27,D1,L6 


BH 


H1,X'25',L6 


BG 


H1,H1,L6 


BH 


H1,T1,L6 


BH 


H1.D1 .L6 
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511 


6C1 


F73D510B 






6C5 


566AA 




512 


6C7 


A10B18 






6CA 


F007510B 






6CE 


56B3 




513 


60/) 


F216510B 






6D4 


56V9 




514 


6D6 


A10B58 






6D9 


F10B9006 






6DD 


56C2 




515 








516 


6DF 


F74A910B 






6E3 


56C8 




517 


6E5 


A10B18 






6E8 


F006910B 






6EC 


56D1 


» 


518 


6EE A10B58 


1 




6F1 


F006910B 


.a! 




6F5 


56DA 




519 


6F7 


F216910B 






6FB 


56E0 




52/J 








521 








522 


6FD A10B18 






700 


F0075748 






704 


5EE9 




523 


706 


F10B5733 






70A 


5EEF 




52^4 


70C 


F10B9734 






710 


5EF5 




525 








526 


712 


E10B3F 






715 


4F250EFC 




527 


7L9 


F10B110B 






7 ID 


5F02 
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BH 


Rl, 12345, L6 


BH 


T1,H1,L6 


BH 


T1,T2,L6 


BH 


R1,D1,L6 


BH 


D1,X , 1234',L6 


BH 


D1,H1,L6 


BH 


D1,T1,L6 


BH 


D1,D2,L6 



* 

*BRAJ\ICH 1ST OPERAND GREATER OR EQUAL 2ND OPERAND 
BHE 25,H1,L6 



BHE 


26,T1,L6 


BHE 


27,D1,L6 


BHE 


Hl,X»25 f ,L6 


BHE 


H1,H1,L6 



w 






MODE: REAL- INSTRUCT IONS PAGE 24 10:04:21 05 AUG L974 

528 71F A10B18 BHE H1,T1,L6 
722 F10B5007 

726 5F0B 

529 728 A10B18 BHE Hl^Dl^ 
72B F10B9006 

72F 5F14 

530 * 

531 731 F73D51J0B BHE Tl, 12345, L6 
735 5F1A 

532 737 A10B18 BHE T1,H1,L6 
73A F007510B 

73E 5F23 

533 740 F216510B BHE T1,T2,L6 
744 5F29 

534 746 A10B58 BHE T1,D1,I_6 
749 F20B9006 

740 5F32 

535 * 

536 74F F74A910B BHE D1,X ' 1234' , L6 
753 5F38 

537 755 AQ0B18 BHE D1,H1,I_6 
758 F006910B 

75C 5F41 

538 75E A10B58 BHE D1,T1,L6 
761 F006910B 

765 5F4A 

539 767 F216910B BHE 01,02,16 
76B 5F50 

540 * 

541 *DECREMENT OPERAND 1 BY f^^^- o 

542 76D F10B1216 BDZ H1,H2,L7 
771 7872 

543 773 F10B5737 BDZ T1,5,L7 
777 786C 

544 779 F10B5216 BDZ T1,T2,L7 



mode: real- instruct ions 
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77D 


7866 


545 


77F 


F10B973E 




783 


7860 


546 


785 


F10B9216 




789 


785A 


547 






548 


78B 


F10B1216 




78F 


7054 


549 


791 


F10B5737 




795 


704E 


550 


797 


F10B5216 




79B 


7048 


551 


79D 


F10B973E 




7A1 


7042 


552 


7A3 


F10B9216 




7A7 


703C 


u. 553 






J, 554 


7A9 


F10B1216 


Ln 


7AD 


7436 


555 


7AF 


F10B5738 




7B3 


7430 


556 


7B5 


F10B5216 




7B9 


742A 


557 


7BB 


F10B973E 




7BF 


7424 


558 


7C1 


F10B9216 




7C5 


741E 


559 






560 


7C7 


F10B1216 




7CB 


7C18 


561 


7CD F10B5737 




7D1 


7C12 


562 


7D3 


F10B5216 




7D7 


7C0C 


563 


7D9 


F10B973E 



BDZ D1,10,L7 

BDZ D1,D2,L7 

^DECREMENT OPERAND 1 BY OPERAND 2 AND BRANCH RESULT NOT ZERO 
BDNZ H1,H2,L7 

BDNZ T1,5,L7 

BDNZ T1,T2,L7 

BDNZ D1,10,L7 

BDNZ D1,D2,L7 

*DECREMENT OPERAND 1 BY OPERAND 2 AND BRANCH RESULT NEGATIVE 
BDLZ H1,H2,L7 

BDLZ T1,5,L7 

BDLZ T1,T2,L7 

BDLZ D1,10,L7 

BDLZ D1,D2,L6 

*DECREMENT OPERAND 1 BY OPERAND 2 AND BRANCH RESULT ZERO OR NEGATIVE 
BDLEZ H1,H2,L7 

BDLEZ T1,5,L7 

BDLEZ T1,T2,L7 

BDLEZ D1,10,L7 
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BDLEZ D1,D2,L7 

*DECREMENT OPERAND 1 BY ONE AND BRANCH RESULT ZERO 
L7 EQU * 

BDZ T1,L7 

BDZ D1,L7 

^DECREMENT OPERAND 1 BY ONE AND BRANCH RESULT NOT ZERO 
BDNZ T1,L7 

BDNZ D1,L7 

^DECREMENT OPERAND 1 BY ONE AND BRANCH Rt-.SULT NEGATIVE 
BDLZ T1,L7 

BDLZ D1,L7 

^DECREMENT OPERAND 1 BY ONE AND BRANCH IF RESULT NEGATIVE OR ZERO 
BDLEZ T1,L7 

BDLEZ D1,L7 

* 

******************************************** 

* CONVERSION INSTRUCTIONS 

**************************** X *************** 

* 

*MOVE DENARY TO DECIMAL 





7DD 


7C06 


564 


7DF 


F10B9216 




7E3 


ICtit) 


565 






566 






567 


6E5 


F10B574C 




7F9 


7A06 


568 


7EB 


F10B9740 




7EF 


7A£5C 


569 






570 


7F1 


F10B574C 




7F5 


7212 


571 


7F7 


F10B9740 




7FB 


72A8 


572 






573 


7FD 


F10B574C 


i 


801 


761E 


S 574 


803 


F10B9740 




807 


7624 


575 






576 


809 


F10B574C 




80D 


7E2A 


577 


80F 


F10B9740 




813 


7E30 


578 






end 






580 






581 






582 






r O -r 






584 






585 






586 






587 


i r 

01 J 


Al 0B1 8 




818 


162F 
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81A 110008 




81D 16F2 


588 


81F A10B58 




822 162F 




824 110008 




827 16F2 


589 


829 1A0B98 




82C 162F 




82E 110008 




831 16F2 


590 


833 F0144739 




837 A10B18 




83A 162F 




83C 111008 




83F 16F2 


591 


841 F0144739 


i*i 


845 A10B58 


i 


848 162F 


on 


84A 111008 




84D 16F2 


592 


84F F0144739 




853 A10B98 




856 162F 




858 111008 




85B 16F2 


593 




59*+ 


85D D21641 


595 


860 D21681 


596 




597 


863 D10B32 


598 


866 D10B72 


599 


869 D10BB2 


600 




601 


86C A73A58 




86F D10B32 



MBO T1,R2 



MBD D1,R2 



MBD 8,H1,R2 



MBO 8,1*1, R2 



MBD 4,D1,R2 



MOVE DECIMAL TO BINARY 
MDB R1,T2 
MDB R1,D2 

MOVE BINARY TO HEX 

MBX H1,R2 
MBX T1,R2 
MBX D1,R2 

MBX 2,H1,R2 



MAXIMUM DIGITS CONVERTED = OPERAND 1 



MODE: REAL- INSTRUCT IONS 



602 


872 


A74D58 




875 


D10B72 


603 


878 


A73958 




87B 


D10BB2 


604 






605 


87E 


A74258 




881 


D10B32 


606 


884 


A73B58 




887 


D10B72 


607 


88A A74358 




88D 


D10BB2 


608 






609 


890 


D21621 


610 


893 


D21661 


611 


896 


D216A1 


w 612 






^ 613 






co 614 






615 






616 






617 






618 






619 






620 






621 


899 


1C03 


622 


89B 


0C1234 


623 






624 


89E 


1A02 


625 


8A0 


111002 


626 


8A3 


am ?^u 

yf^ .*. «_ ^ • 


627 






628 


8A6 


13 


629 






630 


8A7 


14 


631 


8A8 


15 
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MBX 


4,T1,R2 




MBX 


8,D1,R2 




MBXN 


2,H1,R2 




MBXN 


4,T1,R2 




MBXN 


8,D1,R2 




MXB 


R1,H2 




MXB 


R1,T2 




MXB 


R1,D2 
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DIGITS CONVERTED = OPERAND 1 



MOVE HEX TO BINARY 



********************************************* 

* EXECUTION TRANSFER INSTRUCTIONS 

********************************************* 



BRANCH LOCAL 



* 

L5 



B 


L5 


B 


Al 


BSL 


L5 


BSL 


Ml 


RQI 


A1 



BSLI * 

RTN * 
TEXT X'15' 



BRANCH AND SiACK LOCAlION LOCAL 
BRANCH AND STACK LOCATION EXTERNAL 



BRANCH AND STACK LOCATION INDIRECT THROUGH ACCUMULAT 

RETURN 

RETURN WITHOUT TRACE 



mode: real- instruct ions 
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632 






* 






633 


8A9 


101002 




ENT 


Ml 


634 






* 






635 


8AC 


12 




ENTI 


* 


636 






* 






637 


8AD A10B18 




BSL* 


HI 




8B0 


13 








638 


8B1 
8B4 


A10B58 
13 




BSL* 


Tl 


639 


8B5 A10B98 




BSL* 


Dl 




8B8 


13 








640 


8B9 A10B18 




ENT* 


HI 




8BC 


12 








641 


8BD A10B58 




ENT* 


Tl 




8C0 


12 








642 


8C1 


A10B98 




ENT* 


Dl 


O-l 


8C4 


12 








J, 643 






* 






<r> 644 






* 






645 






******************************* 


646 






* 






647 






* I/O AND 


CONTROL INSTRUCTIONS 


648 






* 






649 






*******************************; 


650 






* 






651 






* 






652 


8C5 


426778 




IOI 


R2,3,7 


653 


8C8 


413578 




100 


Rl/1/5 


654 






* 






655 


8CB 


6115 




READ 


Rl 


656 


8CD 


622D 




WRITE 


R2 


657 






* 






653 


8CF 


^10274 




MCAL 


Rl,2,4 


659 






* 
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BRANCH EXTERNAL 

BRANCH EXTERNAL INDIRECT THROUGH ACCUMULATOR 
BRANCH AND STACK LOCATION THROUGH HALF TALLY 
BRANCH AND STACK LOCATION INDIRECT THROUGH TALLY 
BRANCH AND STACK LOCATION INDIRECT THROUGH DOUBLE TA 
BRANCH EXTERNAL INDIRECT THROUGH HALF TALLY/ TALLY/D 



<n? 



^0079 



R 1 v-1 



CALL MONITOR TO INPUT A BYTE 
CALL MONITOR TO OUTPUT A BYTE 

READ ONE BYTE FROM TERMINAL BUFFER 
WRITE ONE BYTE TO TERMINAL BUFFER 

MONITOR CALL 

RELE-SE QUANTUM 



MODE: real- instructions 



'/•'"[-: 3i 
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661 

662 8D5 411290 

663 8D8 413480 
664 

665 8DB 00 
666 

667 8DC 08 

668 8DD 4100A0 

6r r, 

670 830 01 
671 

672 8E1 4100A3 

673 3E4 4100A1 
674 

675 8E7 0B 

676 8E8 0A 
677 

678 
679 
680 
681 
682 
683 
684 
685 8E9 7FF00064 



IB 
OB 

NOP 



R 1 , X * 1 2 » 
Rl,X'34 f 



I/O INSTRUCTIONS 



NO OPERATION 

HALT 

HALT AND DISPLAr' 

TEST INTERRUPTS 

ENTER CONSOLE COT-HAND SWITCHES 
ENTER SENSE SWITCHES 

START VIRTUAL PROCESS 
RETURN TO VIRTUAL PROCESS 

* 

* 

******************************************************* 

* ASSEMBLER DIRECTIVES 

******************************************************* 
* 

FRAME 100 



HALT 


* 


HLD 


Rl 


TEXT 


X'01' 


ECS 


Rl 


ESS 


Rl 


SVP 


* 


RVP 


* 



687 
688 
689 

unp 

691 
692 
693 
694 
695 



LABEL1 
LABEL2 
LABEL3 

i /\ Dtr i /, 

LHUULT 

LABEL5 
LABEL6 
LABEL7 

I f \l— '1— I— W 

LABEL9 



EQU 
EQU 
EQU 

EQU 
EQU 

EQU 

rr\i i 

EQU 



* 

CI 

HI 

T1 
I X 

Dl 
SI 
Rl 

LABEL 
X' 



EQUATES 
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C/J 



o-\ 



696 




* 






697 




LABEL10 


ORG 


L00 


698 001 


534F4D45 




TEXT 


C'SOME CODE' 


005 


20434F44 








009 


45 








699 






ORG 


1 


700 




* 






701 




ABS 


DEFA 


X'080D' 


702 




* 






703 






SETAR 


7 


704 001 


A74358 




LOAD 


1234 


705 




* 






706 




SPEC1 


DEFB 


Rl,*l+7 


707 




SPEC2 


DEFB 


1,*1+11 


708 004 


712B 




MOV 


SPEC1,SPEC2 


006 


91270802 








00A 


812B 








709 




* 






710 




SPEC3 


DEFC 


Rl,*+3 


711 




SPEC4 


DEFC 


1,*+11 


712 00C 


F117010F 




MCC 


SPEC3,SPEC4 


713 




* 






714 




SPEC5 


DEFH 


4l,*+3 


715 




SPEC6 


DEFH 


1,*+11 


716 010 


F11B0U3 




MOV 


SPEC5,SPEC6 


717 




* 






718 




SPEC7 


DEFT 


Rl,*l6+3 


719 




SPEC8 


DEFT 


1,*16+11 


720 014 


F115410D 




MOV 


SPEC7,SPEC3 


721 




* 






722 




SPEC9 


DEFD 


Rl,*l6+3 


723 




SPEC 10 


DEFD 


1,*16+11 


724 018 


F1I7810F 




MOV 


SPEC9,SPEC10 


725 




* 






726 




SPEC 11 


DEFS 


Rl,*16+3 



ORG'S 



DEFINE ABSOLUTE ADDRESS 

SET PROGRAM ADDRESS REGISTER 

SPECIAL DEFCK) FORMS 
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727 
728 
729 
730 
731 
732 
733 
734 
735 
736 

737 
738 
739 
740 
741 
742 
743 
744 
745 
746 
747 



01C F119C111 



020 
021 
02^ 
024 
028 
02C 



02E 
031 

034 
038 
03C 
040 
044 
048 
04A 
04E 



41 
19 
0200 

0001E240 
00000000 



11004D 
11104D 

54484953 

20495320 

41205445 

58542040 

45535341 

4745^ 

54484953 

20495320 



SPEC12 DEFS 1,*16+11 

MOV SPEC11,SPEC12 

* PLEASE SEE ABOVE FOR DEF(K) 



LABEL12 



* 

REG1 

REG2 

REG3 
* 

LABEL13 
LABEL14 



CHR C'A T 
HTLY 25 
TLY X'200 
DTLY 123456 
SR 



AR 
AR 
AR 



Rl 
2 

HS 



DEFINE TYPE ADDRESS REGISTER 



DEFINE MODAL ENTRY 



DEFM 0,77 

DEFM 1, LABEL 13 

BSL LABEL13 

BSL LABEL14 



TEXT C'THIS IS A TEXT MESSAGE ', C 'THI S IS SOME MORE',X f FF f 



056 
05A 
05B 

748 

749 05C 



204D4F52 

45 

FF 



TiilS ALLOWS COMMENTS TO BE STARTED IN I HE COMMENTS 



••■G: 



REAL- IN: 



Mi) 



05E 


0050 


060 


0020 


062 


0017 


.064 


0014 


066 


00 1A 


063 


0000001B 


06C 


0025 


06E 


0005 


070 


0005 


072 


0008 


074 


0002 


076 


0084 


^78 


0360 


fl?& 


3039 


u / C 


00000iU\ 


030 


040000?! 




*<082 


036 


0388 


088 


WMW^) 


nc 


1393 


08E 


0233 


,590 


0019 


092 


03F8 


094 


00001234 


098 


0001 


09A 


0004 


09C 


04D2 



EOF: 



10: 04:29 



-VJb 1--./4 



3.8 ASSEMBLER TABLES 

The REAL Assembler is completely table-driven and is therefore both 
powerful and flexible in its definition of mnemonics. In addition, 
the assembler accesses a permanent symbol table, which allows the 
predef inition of a set of symbols used by all assemblies. Symbols 
defined in the source mode are placed in a temporary (local) symbol 
table, and such entries override corresponding entries in the perma- 
nent symbol file. It should be noted that forward references to 
local symbols that match entries in the permanent symbol table will, 
in general, cause assembly errors. Therefore, such overriding symbol 
definitions must precede the first reference to them. 

At the start of the assembly process, the assembler searches the 
Master Dictionary (M/DICT) of the data-base for the following file 
definitions : 



PSYM 



TSYM 



OSYM 



Permanent symbol table. 
Temporary symbol table. 
Operation-code symbol table. 



The assembly wilL abort if any of these file-definitions are missing, 
with a message indicating the one that was not found. The temporary 
symbol table is inititalized before the assembly starts. Since the 
TSYM is actually a permanently defined file on a user's account 
(M/DICT) it must be pre-defined and can be examined at the conclusion 
of the assembly. Furthermore, only one person may be using the REAL 
assembler per account. 



3.8.1 TSYM/PSYM TABLE ENTRY FORMATS 

The item format of the entries in the PSYM & TSYM files is as follows: 
(Entries are in character form): 



Item - id 
Line 1 
Line 2 
Line 3 



Symbol-name 

Symbol-code (single character - see below). 
Symbol-value (hexadecimal location or displacement) 
Base-register value (single hexadecimal digit) 



Symbol-Codes 

The symbol code is a single character code that defines the type of the 
symbol, it is used in the operation code lookup to determine legal 
operands, and to flag undefined or multi-defined labels, etc. 
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Code Description - Symbol Type Unit of Displacement 

B Bit Bits 

C Character Register Bytes 

D Double-Word (4-byte) Words 

H Half-Word Q-byte) Bytes 

L Local Symbol, defined Bytes 

M Mode - id Undefined 

N Literal Value Bytes 

R Address Register Undefined 

S Storage Register (6 Bytes) Words 

T Word (2 Bytes) Words 

U Local Symbol, Undefined Value=0 

3.8.2 OSYM TABLE -LOOKUP TECHNIQUE 

All REAL mnemonic operation codes are stored in the OSYM file. An entry 
in this table may be either (1) the REAL mnemonic for the instruction 
(basic op-code), or (2) the REAL mnemonic suffixed by the symbol type- 
codes of all the operand field entries. The purpose of the suffixing is 
(1) to provide for the separate handling of REAL mnemonics with variable 
operand field entries; (2) to provide for a check on the number and type 
of operand field entries. As an example, the basic REAL mnemonic for 
"move register to register" is MOV, but it has four different object 
code expansions, depending on whether the registers involved are address (R) , 
or storage-type (S) . To allow for all cases, there are four entries in 
the OSYM file: MOVRR, MOVRS , MOVSR and MOVSS. The assembler will attempt 
to look up the basic op-code first, and, if it is not found, a second 
attempt will be made with the basic op-code suffixed as described above. 

3.8.3 TSYM TABLE ENTRY SETUP 

As the assembler goes through the "suffixing" technique described above, it 
necessarily looks up each non-literal operand in the TSYM and PSYM files, 
in that order. If found, the type-code can be suffixed to the basic 
op-code. If no entry is found in the TSYM & PSYM files, the assembler 
then sets up an entry in the TSYM file with type "U" (undefined) , and 
location zero. This has an important ramification with regard to literal 
generation. 
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3.8.4 OSYM TABLE ENTRY FORMAT 

Line one of the OSYM table entry may be one of the following: 

M - Defines a macro; all further lines are macro substitution 
lines. 

P - Defines "primitive" which calls one of the lower-level 
assem-ler functions. 

Q - Equates this entry to another OSYM table entry specified 
in the next line. 



3.8.5 MACRO DEFINITION FORMAT 

Each substitution line in a macro definition will generate a new source 
statement, to which parameters may be passed from the original source state- 
ment. This newly generated source statement will, in turn, be assembled as 
any other source statement. Thus a macro may cause the original statement 
to expand into an unlimited set of new statements; however, if any gener- 
ated statement calls another macro, control is passed immediately to the 
new macro, and the previous one cannot regain control. 

Data in a macro substitution line is transferred, as it is, to generate the 
new source statement, except for the substitution codes, which cause a 
specific parameter to be substituted. Substitution codes are enclosed by 
parentheses : 



CODE 



AF Substitution 



(n) 



Label Substitution: 
(L + n) 



ACT T ON 

(n decimal) causes insertion of the n-th Argument- 
field entry of the original source statement; if 
such an entry is non-existene, no substitution 
takes place. 

(The +n is optional). Causes insertion of label 
internal to the macro; the label is created using 
the macro label counter (MLC) , which is initial- 
ized by the assembler at the start of an assembly, 
If the label substitution is in the label-field 
of the generated source statement, it is replaced 
with a label of the form "=Lm" where m=MLC + 1, 
and the MLC is incremented by one. 

If the label substitution code is in the operand 
field, it is replaced with a symbol of the form 
"=Lm" where m=MLC + n, the MLC being unaltered. 
(See Section 3.13.) 
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3.8.6 "PRIMITIVE" DEFINITION FORMATS 

Each line in a primitive is an assembler-directive that calls a specific 
assembler process. The first character in each line is a code defining 
the process: 



CODE 
A 
E 
G 
R 



PROCESS 
Align location counter on word boundary. 
Exit to explicitly defined process. 
Generate object-code (GEN) 
Reset entry in TSYM file (RESET) 



Exit Format 



E:mode-ID 



Where "mode-ID" is the hexadecimal mode-ID of the processor which is to 
be entered. 



Gen Format 



G» a l' a 2 " ' * 



A-field 



V V 



B-field 



(A & B-fields separated 
by one blank) 



The G-primitive causes the actual generation of object code. There should 
be a one-to-one correspondence between entries in the A- & B- fields. Each 
A-field entry is a decimal number, and specifies the number of bits of code 
to be generated using the corresponding B-field entry. The sum of the 
A-field values must be a multiple of 8, and must be less than or equal to 
32. 



ENTRY 
* 

*n 
B 
n 
X'h' 



VALUE RETURNED 
Current location counter value, in bytes 
As above, modulo "n" bits (n decimal) 
Current base register value. 
Decimal literal. 
Hexadecimal literal. 
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ENTRY VALUE RETURNED 

C'k' Character literal (one character only). 

An;m Value returned is: 

(1) AFn if AFn is a literal; or 

(2) From line M m M of AFn if AFn is a symbol. 
(Zero is symbol undefined). 

Jn ; k Used to compute relative displacement from 

current location (*) , to the location defined 
by AFn. Value returned is signed magnitude, 
10-bits: . 

(Value (AFn)-*)-k "* " backward reference 

-k it forward reference 



Reset Format 



R,n b 1 ,b 2 ,....b m 

Resets values in TSYM entry for AFn. B-field entries refer to lines 1 
through m, and entries are as above. This is used to re-define TSYM table 
entries: when the assembler finds a label-definition, it inserts the 
entry in the TSYM as type 'L', location as current location in bytes, 
and base register field from the current base register. To redefine the 
entry, a R-primitive is used. For example, the opcode 'TLY' is used to 
define a local tally, as in: 

LABEL TLY 12 3 

The OSYM entry for 'TLY' is: 

Line 1 (type) : P 

Line 2 : R,0 C , T , ,*16,B Redefines type as T; 

location module 16. 

Line 3 : G,16 A2 ; 2 Generates 2-byte object-code 

value 



3.9 ASSEMBLER OUTPUT 

The assembler output consists of (1) macro statement expansions; (2) error 
messages and (3) generated object code, all appended to the original 
source statement. 

A user-input source statement is of the format: 

Source Statement (ASi) 
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On output, the format is as follows: 

Source Statement (SVM) location object-code (AM) 

where 'location' is a 3-digit hexadecimal field, and the 'object code' is 

in hexadecimal. 

Error messages are appended to the source statement as the assembler 
encounters errors; the messages are appended in the format: 

. . (VM)* message. . . . 

Messages may precede or follow the object code. 

Macro expansions resemble source statements in terms of source statement, 
errors and object code, and are of the format: 

Source Statement (VM) macro statement (SVM) loc. ob j . code (VM)... 

(AM). 

Note that regardless of what the assembler appends to the original source 
statement, the delimiters surrounding the entire statement remain 
unchanged; this ensures proper source statement input on subsequent 
assemblies. 

3.10 LITERAL GENERATION 

REAL statements that require assembly of literal should setup entries in 

the TSYM of the following format: 



I tern- ID : =k value 

Symbol- type : II k=< 

Location : 



( 

S storage register 



D double word 
T word 



This will be done simply by the reference of the symbol as an operand 

in a source statement. However, the OSYM table entry that the source 

statement references must be of the "suffixed" type rather than being 
the basic op-code. For example, the statement: 

MOV =T23,CTRI 

which references the OSYM table entry 'MOVTT' , and, in so doing, sets up 
the TSYM entry '=T23' as type U to be assembled as a literal. 
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At the end of pass I, the assembler searches the TSYM file for undefined 
entries; if they are of the format shown above, a dummy source statement 
of the form: 



LABEL 



=k value 



OPCODE 



:k 



OPERAND 



value 



is generated and assembled. Thus the entries " : S" , " : D M , ":T" in the 

OSYM are reserved and cause generation of 6-byte (storage register, type S) , 

4-byte (double-word, type D) and 2-byte (word, type T) literals, respectively 



3.11 REASSEMBLY IN PASS II 

During the assembly process, statements which have a forward reference are 
flagged for re-assembly by prefixing the character "X" to the location 
counter and object code data that are appended to the source statement. 
The REAL assembler is not a true two-pass assembler; pass II consists of 
scanning the mode for statements that have been flagged for re-assembly, 
and re-assembling those statements exclusively. If they contain references 
to undefined symbols, the object code output will still have the "reassemble" 
flag stored with it, after pass II. 



3.12 ASSEMBLER ERROR MESSAGES 

Message 
*UNDEF: Symbol 1 Symbol 



*LABEL TYPE 

*MULTIDEF 

*REF-UNDEF 

*LABEL ? 

^OPCODE ? 

^OPERAND ? 

*OPCD ILLGL: opcode 



Explanation 



Undefined symbols at end of pass I 
(Message at end-of-mode) . 



Label-field format error. 

Label-field entry was previously defined. 

Reference to undefined symbol. 

Required label-field missing. 

Op-code-field entry missing. 

Required operand-field entry missing. 

Either the opcode was illegal, or the 
operand types were illegal for the 
opcode. 
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*OPRND TYPE 



The operand-field entry was an illegal 
type; eg: ORG statement with undefined 
symbol, SETAR with non-numeric operand, 
etc. 

The range of the operand-field entry 

is illegal; eg: SETAR with n not 0<n<16. 

Object code truncation may be due to: 
branch out-of-range; TSYM/PSYM table entry 
error; specification error in the GEN 
primitive. 



The following are errors in the OSYM-table entry specifications. 



GRANGE ERR 



^TRUNCATION 



* A- FIELD ? 
*B-FIELD ? 

^OPCODE-TYPE ERR 



*MACRO-SPEC ERR 



Error in A- or B-field specification. 



Opcode type not a P/Q/M, or primitive 
type was illegal. 

Error in the macro specification 



3.13 EXAMPLE OF REAL MACRO EXPANSION 

Location Counter = X'012' 
MLC = 



Source Statement 

(Branch if character 
addressed by R4 is 
numeric) 



PSYM table entry 
TSYM table entry 
OSYM table lookup 

Line 1 (type) 

Line 2 

Line 3 

Line 4 



BCN 



R4.LABX 



Displacement 
0004 
0024 



Symbol Type 

R4 R 

LABX L 

BCNRL 

M 

BCL (2),X'30',(L + 1) If 0, skip next 

BCLE (2),X'39',(3) Branch is<9 



(L) EQU * 



Define Internal 
label 
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Generated Source Statements 



From Line 1 
From Line 2 
From Line 3 
OSYM table lookup 
Line 1 (type) 
Line 2 



BCL R4,X'30 f ,=L01 
BCLE R4,X'39' ,LABX 
=L01 EQU * 
BCLERNL 
P 
G, 4, 4, 8, 4, 2, 10 



4 , A2;2 , A3;2 , , 3 , J4;4 

^Pickup value 
"4" from PSYM 
•item 'R4' 

Pickup value 
X'30' (ASCIT 0) 
from AF2 

■Pickup relative dis- 
placement from * to 
LABX: adjust by 
4 bytes 




Object Code 



X'4430 COE' 
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3.14 CORRECT USE OF REGISTER TO STORAGE REGISTER COMPARE OPERATION 



The BE an 
3.7.5) op 
adding th 
of the re 
compare e 
This will 
pointing 
12340 and 
FID, and 
within th 



d BU instruct 
erate by mult 
e displacemen 
suit. This a 
qual in certa 

happen when 
to frames who 

12468) with 
the relative 
eir respectiv 



ions with R and S type operands (see Section 
iplying the FID's of the registers by 500, 
ts, and then comparing the low order n bits 
Hows a register and storage register to 
in cases when they are in fact not equal, 
the registers are in the linked format 
se FID's are a multiple of 128 apart (e.g., 
the storage register containing the lower 
displacements of the registers are equal 
e frames. 



To correctly perform a register to storage register compare opera 
tion, one of the three forms discussed below must be used. Forms 
2 and 3 use the BRE and BRU macros; these macros expand into a 



comparison of the double tallies which are the FID's 
ters , followed by the comparison of the registers in 
manner . 



of the regis 
the normal 



FORM 1 

Form 1 uses the BE and BU instructions. Form 1 may be used when 
one of the following occur: 

• The R and SR are in linked format and are known to point 
within the same frame. (This is a rare circumstance.) 

• The R and SR are in unlinked format. (For example, IB 
and IBEND.) 

• The R and SR are in linked format and are known to point 
within the same contiguously linked block of frames, and 
point to frames which are less than 32 frames apart. 

• The R and SR are in linked format, the displacement of 
each is less than 500, and the difference between the 
registers is less than 500 bytes. 

The following illustrates an example of this form: 

L0 EQU * 

001 C0E7AA04 BE IB, IBEND, L0 

005 C0E7AA08 BE IB, IBEND, L0 

009 C0E7A20C BU IB, IBEND, L0 

00D C0E7A210 BU IBEND, IB, La 
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FORM 2 

Form 2 uses the BRE and BRU macros. This form must be used when 
the R and SR are in linked format, the displacement of each is 
less than 500, and nothing else is known about the registers 
(typically in the case of IR and SR4) . The following illustrates 
an example of this form: 





L0 


EQU 


* 


Oil 


F271909A 


BRE 


IR,SR4,L0 


015 


5004 






017 


C2706A1A 






01B 


F271909A 


BRU 


IR,SR4 ,L0 


OIF 


5220 






021 


C2706224 







FORM 5 

The FAR instruction must be used in conjunction with BRE and BRU 
macros under the following circumstances: When the R and SR are 
in linked format, the displacement of t;he SR is less than 500, and 
nothing else is known about the registers. The following illus- 
trates the use of this form: 



025 
028 
02C 
02E 



L0 
440060 
F0669092 
5004 
C0654A31 



EQU 
FAR 
BRE 



IS,0 
IS,1SEND,L0 



FORCES DISPLACEMENT OF REGISTER 
TO BE LESS THAN 500 



032 440060 FAR 
035 F0669092 BRU 
038 C065423E 



IS,0 
IS,ISEND,L0 



FORCES DISPLACEMENT 
TO BE LESS THAN 500 



OF REGISTER 



NOTE 

None of the forms will work when either of the following is true 



Both registers are not in 
linked) . 



the same format (linked or un- 



The displacement of the SR is greater than 499 (unless the 
R and SR are in linked format and are known to point within 
the same contiguously linked block of frames and point to 
frames which are less than 32 frames apart). If this oc- 
curs, the SR must be moved to a scratch register; the dis- 
placement of the register must be forced to be less than 
500 (i.e., by a FAR instruction); and the register must 
be moved back to the storage register for the compare. 
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3.15 REAL 

ADDR 

ADD 

AND 

AR 

B 

BBS 

BBZ 

BCA 

BCE 

BCH(E) 

BCL(E) 

BCN 

BCU 

BCX 

BDLEZ 

BDLZ 

BDNZ 

BDZ 

BEL 

BL(E) 

BH(E) 

BSL 

BSLI 

BU 



INSTRUCTION SUMMARY 
defines address 
add to accumulator 
and variables 
defines address register 
branch unconditional 
branch on bit set 
branch on bit zero 
branch on character alphabetic 
branch on character equal 
branch character high (or equal) 
branch character low (or equal) 
branch on character numeric 
branch on character unequal 
branch on hexadecimal character 
branch decrementing word < = zero 
branch decrementing word < zero 
branch decrementing word not zero 
branch decrementing word zero 
branch word equal 
branch word < (or=) 
branch word > (or=) 
branch and stack location 
branch and stack location indirect 
branch word unequal 
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CHR 

DEC 

DEFA 

DEF_ 

DEFM 

DIV 

DTLY 

ECS 

ENT(I) 

ESS 

FAR 

HALT 

HLD 

HTLY 

IB 

INC 

10 1 

100 

LAD 

LOAD 

MBD 

MBX(N) 

MCAL 

MCC 

MCI 



define character 

decrement 

define as absolute address 

define as b,c,d,h,l,s, or t 

define as m 

divide accumulator 

define as doubleword 

enter console switches 

external transfer (indirect) 

enter sense switches 

flag and attach register 

halts CPU 

halt cpu and display address 

define as halfword 

input byte 

increment 

I/O instruction input 

I/O instruction output 

load absolute difference 

load accumulator 

move binary to decimal (n char) 

move binary to hex (n char) 

monitor call 

move character to character 

move character to incrementing char 
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MDB 

MIC 

Mil 

MUD 

MIIR 

MIIT 

MOV 

MUL 

MXB 

NEG 

NOP 

OB 

ONE 

OR 

READ 

RQM 

RTN 

RVP 

SB 

SCD 

SR 

SRA 

STORE 

SUB 

SVP 



move decimal to binary 

move incrementing char to char 

move inc char to inc char 

move inc char to inc char (delimiter) 

move inc char to inc char (register) 

move inc char to inc char (word) 

move word to word 

multiply accumulator 

move hex to binary 

negate 

no op 

output byte 

set word equal to one 

logocal or 

read 

return time quantum 

return 

resume virtual process 

set bit 

scan characters to delimiter 

define as storage register 

set register to address 

store accumulator 

subtract from accumulator 

start virtual process 
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5-18 
5-26 
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TEXT message 

TLY define as word 

TST test (set condition flags) 

WRITE write 
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SECTION 4 

THE INTERACTIVE DEBUGGER (DEBUG) 

The Interactive Debugger (DEBUG) provides a means for monitoring 
and controlling program execution. For all Reality users, DEBUG 
has the ability to turn the print off at the terminal, and to 
terminate program execution. 

The use of the extended facilities of DEBUG (other than turning 
the terminal printing on and off, and terminating program execu- 
tion) require system privileges level two. If the user has such 
privileges, he may control program execution by the insertion of 
break-points in the program, and by executing specific DEBUG 
commands. The user may also trace execution by displaying data 
at specific locations. DEBUG additionally allows the user to 
display data throughout the virtual memory of the system. 

Thus (for users with system privileges level two) DEBUG is ideally 
suited for the check-out phase of assembly language programming. 



4.1 ENTERING DEBUG 

DEBUG is entered voluntarily by depressing the BREAK key on the 
terminal (INT key on some terminals) . DEBUG will then display the 
location of the execution interruption point, followed by the 
DEBUG prompt character; the DEBUG prompt character is the exclama 
tion mark ( ! ) . 

DEBUG is entered involuntarily when a hardware trap condition oc- 
curs. In this case, DEBUG will display a message indicating the 
nature of the error causing the trap (see Section 4.6), followed 
by the location at which the trap occurred, followed by the DEBUG 
prompt character ( ! 'I . 

When the DEBUG prompt character is displayed, the user enters an 
appropriate DEBUG Control Command or DEBUG Data Display Command. 



4 . 2 THE DEBUG CONTROL COMMANDS 



4.2.1 CONTROL COMMAND SYNTAX 

Prior to describing the actual DEBUG Control Commands, it is 
necessary to define the terms "address" and "indirect-address" 
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Address 

An "address" references a byte in virtual memory. An "address" 
consists of a frame-id (FID) and an offset byte displacement 
within the frame. The FID and/or displacement may be either in 
decimal or hexadecimal. The general forms of an "address" are 
shown below ("f" represents the FID value, and "d" represents the 
displacement value) . 

Address Description 

f,d FID in decimal; displacement in decimal, 

f.d FID in decimal; displacement in hexadecimal. 

,f,d FID in hexadecimal; displacement in decimal, 

.f.d FID in hexadecimal; displacement in hexadecimal, 

.d Displacement in hexadecimal. 

,d Displacement in decimal. 

If the FID value is omitted, then the PCB FID is used as a default 
value. The displacement must be in the range < d < 512. 

As a general example, the following "addresses" are equivalent: 

12. 3C 
12,60 
.C.3C 
.C,60 

Indirect -Address 

An "indirect-address" references a byte in the virtual memory by 
specifying an Address Register which therefore indirectly refer- 
ences a particular byte. Address Registers zero and one cannot 
be used in this manner. The "indirect-address" specification 
takes the following forms. 

Indirect -Address Description 

Rr Specifies Address Register "r" (where 

"r" is a decimal value in the range 
2 < r < 15) . 

R.r Specifies Address Register "r" (where 

"r" is a hexadecimal value in the range 
2 < r < F) . 
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Note that "indirect-addresses" have an implied displacement within 
the FID that the Address Register is pointing to; this displacement 
depends on whether the register is in the "linked" or the "unlinked" 
format (see Section 2) . 



4.2.2 DEBUG CONTROL TABLES 

DEBUG maintains three tables which may be manipulated by the DEBUG 
commands: the Break Table, the Trace Table, and the Indirect Trace 
Table. If there are entries in the Break Table, the address of 
every instruction is compared with the address in the Break Table 
and a break occurs if there is a match. If there are entries in 
the Trace or Indirect Trace Tables, then the data pointed at by the 
entries are printed whenever a break message is printed (see Sec- 
tion 4.4). Up to four entries can be placed in each of these ta- 
bles . 



4.2.3 CONTROL COMMANDS 

The following is a list of the DEBUG Control Commands. Users 
without system privileges level two may only use the P, G, END, 
and OFF commands . 



General Form Des cription 

B address This command adds the "address" to 

the Break Table. 

D This command displays the Break 

Table and Trace Table. 

E n This command sets the Execution 

Counter to "n" , where "n" is a posi- 
tive integer < 250. Setting the 
Execution Counter causes a break to 
occur after the execution of every 
"n" instruction. The command "E 0" 
turns off the Execution Counter. 

END This command terminates execution 

and returns to TCL . 

G This command causes resumption of 

process execution from the point of 
interruption. G cannot be used if a 
process ABORT condition caused the 
entry to DEBUG. 

G address This command causes resumption of 

execution at the specified "address" 
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General Form Description 

K address This command "kills" the break-point 

(i.e., deletes "address" from Break 
Table) . 

M Each entry of an M command switches 

(toggles) "Modal-Break" status ON 
and OFF. When "Modal -Break" status 
is ON, a break in execution will oc- 
cur upon all intermodal transfers 
(i.e., BSL or ENT instructions; see 
Section 3.7.8). The message "ON" is 
displayed when the M command switches 
"Modal -Break" on; the message "OFF" 
is displayed when "Modal -Break" is 
switched off. 

N n This command sets the Break-Point 

Counter to "n" (i.e., inhibits traps 
until "n" breaks have occurred). 

OFF This command logs the user off of the 

system . 

P Each entry of a P command switches 

(toggles) from print suppression to 
print non- suppression . The message 
OFF is displayed if output is currently 
suppressed. The message ON is dis- 
played if output is resumed. 

T address This command adds the "address" to the 

Trace Table. 

T indirect-address This command adds the "indirect-address" 

to the Indirect Trace Table. 

U address This command deletes the "address" from 

the Trace Table. 

U indirect-address This command deletes the "indirect- 
address" from the Indirect Trace Table. 



Examples of these commands are provided in Section 4.5. 
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4.3 THE DEBUG DATA DISPLAY COMMANDS 



4.3.1 WINDOWS 



Before descriging the Data Display commands, it is necessary to 
define the concept known as a "window". 

A "window" specifies the number of bytes to display (m) , and 
optionally the negative displacement (n) from the "address" or 
"indirect-address" from which to start the display. If n is not 
specified, it is assumed to be zero. The general forms of the 
"window" are shown below. 



Window Description 

;m Number of bytes in decimal. 

; .m Number of bytes in hexadecimal. 

;n,m Displacement in decimal; number of bytes in 
decimal . 

;n.m Displacement in decimal; number of bytes in 
hexadecimal . 

;.n,m Displacement in hexadecimal; number of bytes in 
decimal . 

;.n.m Displacement in hexadecimal; number of bytes in 
hexadecimal . 



The default "window" is 0,4 (no negative displacement, display 
four bytes) . 
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4.3.2 DATA DISPLAY COMMANDS 

The following is a list of the DEBUG Data Display commands. 

General Fo rm Descriptio n 

Caddress iwindow _. . 

These commands display speci- 

Cindirect-address;window fied data in character format. 

Xaddress '.window „,. , ,. , 

These commands display speci- 

Xindirect-address;window fied data in hexadecimal format 

Iaddressjwindow These commands display speci- 

tied data in integer format. 

Iindirect-addressjwindow (I f "window" is not 1, 2 or 4, 

only one byte of data will be 
displayed. ) 

Immediately after the data at the specified address has been dis- 
played, DEBUG prompts with an equal sign ( = ) . The user then 
enters either a Data Replacement Specification or a Special Con- 
trol Character. 



4.3.3 DATA REPLACEMENT SPECIFICATIONS 

Displayed data may be altered (replaced) by entering the new data 
in one of the following forms (after DEBUG prompts with an equal 
sign) . 

General Fcrm Description 

.xxxxxx... Replaces data with hexadecimal string 

"xxxxxx" . The string should contain an 
even number of hexadecimal digits, and 
may be up to 80 digits in length. 

'cccccc... Replaces data with character string "cccccc" 

The string may be up to 80 characters in 
length. 

n Replaces data with integer value "n" . In 

this case, the window must have been 1, 2 
or 4 . 
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In the case of a hexadecimal or character string replacement, the 
data actually replaced may extend beyond the currently defined 
"window" . 

A Special Control Character (see Section 4.3.4) must be entered 
immediately following a Data Replacement Specification. 



4.3.4 SPECIAL CONTROL CHARACTERS 

The user may enter a Special Control Character in response to the 
DEBUG equal sign prompt character. In addition, the user must 
terminate a Data Replacement Specification (see Section 4.3.3) 
with a Special Control Character. 

The Special Control Characters are listed below. 

Control Character Description 

Carriage Return Terminates display mode; DEBUG will 

prompt with an exclamation mark (!). 

Line Feed Displays data in the next "window" 

(i.e., the previously specified "ad- 
dress" or "indirect-address" is updated 
according to the currently specified 
"window") . The data is displayed on 
the same line. 

Control-N Displays data in the next "window", 

preceded, by the address being displayed 
(in the format "f.d", where f is in 
decimal and d is in hexadecimal) . 

Control-P Displays data in the previous "window", 

preceded by the address being displayed 
(in the format "f.d") . 

On a display using the "indirect-address" specification, the Line 
Feed or Control-N will cause an automatic crossing of linked frame 
boundaries if the register being used in the display is in the 
"linked" format. 



4.4 BREAK MESSAGES 

DEGUG causes an execution break to occur when the BREAK key on the 
terminal is depressed. DEBUG also has the facility to break on 
intermodal transfers (i.e., BSL or ENT instructions; see Section 
3.7.8); the M command acts as an alternate action switch, to change 
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this feature from ON to OFF. A break can also be initiated with 
the E command, causing a break after the execution of a specified 
number of instructions. The following messages are output when 
a break in execution occurs . 



Mess age Condition 

Break-point address encountered. (Break Table 
match . ) 

Execution runout (specified number of instruc- 
tions have been executed) . 

Interrupt (Break key depressed) . 

Modal break (Inter- frame branch; ENT or BSL 
instruction encountered) . 

R f.d Return (RTN) instruction encountered. 

where "f" is the decimal FID and "d" the hexadecimal displace- 
ment, representing the location of the execution interruption 
point . 

The Execution Break and Address Break facilities are mutually ex- 
clusive. When the Execution Counter is positive, Break Table en- 
tries are ignored. However, the Break Table of the Execution Break 
facility can be used with the Modal Break facility. 



B 


f.d 


E 


f.d 


I 


f.d 


M 


f.d 
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4.5 EXAMPLES 



4.5.1 SIMPLE EXAMPLE 

The following example illustrates a simple DEBUG interaction 
features illustrated here may be used by all Reality users. 



The 



:i,IM: SYSTEM-MQDBS FRAME ;HDR-SUPB(C^ ENGLISH LIST statement 

SYSTEM-MODES FRAME ^ 



WSPACES 
EDIT-I 
PQUEUE/1200 
WRAPUP-II— 

I 6.1 A3- 

!P @)OFF — 
!G<tlfL 



FRAME 
FRAME 
FRAME 



172 
013 
164 



I 3.FB 
!P <fR)ON 

i 




FRAME 
FRAME 
FRAME 



018 
019 
036 



Listing output from 
system. 

BREAK key depressed. 
Interrupt message. 
Turns Print off. 
Go (resumes execution 
without printing) . 
BREAK key depressed. 
Interrupt message. 
Turn Print back on. 
Go (resumes execution 
with printing) . 

Listing output resumes. 

BREAK key depressed. 
Interrupt message. 
Terminates LIST execution 

TCL prompt. 
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4.5.2 EXTENDED EXAMPLE 

The following example illustrates use of the extended DEBUG facili 
ties. These facilities can be used only by users with system 
privileges level two. 



BREAK key depressed. 



12;6(CR) .IE 132 7 101 88 1 = .&1 2'34.S67 89ABCDEF N* 

18 .CDEF3456 7 890=N C ** 

IE . 012C00000964= r OMN P 




c 



18 .CDEF34567890=(Lg 
24 .0004000A0000=tCR: 



4B4A4D4E0064=N 



: HHHH CEg>- 



R 5.49* 

512.40 = .000002060000* 

R 0.4 : 528. = .004154545 249- 



M 7 . 3-* 

512.40 = .000002060000 
R 0.4 : 528. = ,004 154545 249 
R 5.78 

512.40 = .000020920000 
R 0.4 : 528. = .004154545 249 
M 10.1 

512.40 = .00002092^000 
R 0.4 : 528. = .004154545 249 
M 8.1 

512.40 = .000020920000 
R 0.4 : 528. = .004154545 249 
R 10.32 

512.40 = .000020920000 
R 0.4 : 528. = .004154545 249 



!D<C§>#- 
BRK TBL 

TRC TBL 

*TRC TBL 

!END(CR> 



0. 0. 0. 0.«* 

512.40 0. 0. 0. 
0.4 0. 0. 0.-*— 



"X 



■Dis 
•Dis 
(no 
Cha 
cha 
Set 
Set 
Tra 
PCB 
Tra 
Co . 
TCL 



play and change data 
play next window 

change) . 
n g e data in 
racter form. 

Modal Trace on. 

delay counter, 
ce location .40 in 

ce Register four. 

statement . 



RTN instruction 
encountered . 
Data from direct trace. 
Data from indirect 
tra ce . 
v Modal break. 



Display Break and 
Trace Table entries. 
Break Table entries. 
-Trace Table entries. 
Indirect Trace 
Table entries. 
Terminate Execution. 
Back to TCL . 
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4.6 HARDWARE TRAP CONDITIONS 

Certain error conditions cause the CPU to execute a trap to the 
DEBUG state; processing of the current program will be aborted, 
and a message indicating the nature of the trap (and the location 
at which it occurred) will be displayed. The following list shows 
these error conditions. 



Error No 



Message 
ILLGL OPCODE 



Description 

An illegal (undefined) 
operation code has been 
found. 



RTN STK EMPTY 



RTN STK FULL 



3* 



FRM-ID ZERO 



An RTN (return) instruction 
was executed when the 
return- stack was empty 
(current pointer was at 
X'0184') . 

A BSL or BSLI (subroutine 
call) instruction was exe- 
cuted when the return- stack 
was full (current pointer 
was at X'OIBO'); the return- 
stack has been reset to an 
"empty" condition before the 
trap . 

An address register has an 
FID of zero. 



CROSSING FRM LIMIT 



FORW LNK ZERO 



An address register in the 
"unlinked" format has been 
incremented or decremented 
off the boundary of a frame, 
or has been used in a rela- 
tive address computation 
that causes the generated 
relative address to cross a 
frame boundary. 

An address register in the 
"linked" format has been 
incremented past the last 
frame in the linked frame 
set . 



BACKW LNK ZERO 



An address register in the 
"linked" format has been 
decremented prior to the 
first frame in the linked 
frame set. 
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Error No 



11 



12 



Message 
PRIV OPCODE 



ILLGL. FRAME- ID 



STK FRMT ERR 



REGISTER ZERO 
DETACHED 



Description 

A Privileged operation code 
(one executable only in the 
Monitor mode of operation) , 
has been found while execut- 
ing in the Virtual mode . 

An address register has an 
FID that exceeds the maximum 
value allowable in the cur- 
rent disc configuration. 

The Return-stack pointers 
are in an illegal format. 
Either the ending address 
is less than X'0184', or the 
current address is less than 
X'0184'. The pointers have 
been reset to an initial 
condition of X'01B0 T and 
X'0184', respectively. 

Register zero has been de- 
tached by a user-program. 



In the case of the traps marked with an asterisk (*) in the list 
above, the following message will also be returned: 

REG = 0.x 

where "x" is the hexadecimal Address Register number of the register 
causing the trap condition. 

In all cases, the following message will also be returned: 
ABORT @ f.d 

where "f" is the decimal FID of the frame and "d" is the hexadeci- 
mal displacement within it (of the location where the trap occurred) 
This corresponds to the location counter in the assembly listing of 
the corresponding program. 

Note that the G command, without an address specification, cannot 
be used after a trap to the DEBUG state. 
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SECTION 5 
SYSTEM SOFTWARE 



5.1 INTRODUCTION 

Assembly level programming in the Reality system is facilitated 
by a set of system subroutines that allow easy interaction with the 
disc file structure, terminal I/O, and other routines. These sub- 
routines work with a standard set of addressing registers, storage 
registers, tallys, character registers, bits, and buffer pointers, 
collectively called functional elements. In order to use any of these 
routines, therefore, it is essential that the calling routine set up 
the appropriate functional elements as required by the called routine's 
Input Interface. 

The standard set of functional elements is pre-defined in the 
permanent symbol file (PSYM) , and is therefore always available to the 
programmer. Included in the PSYM are all the mode-id's (program entry 
points) for the standard system subroutines. There is no reason that 
a symbol internal to an assembly program cannot have the same name 
as a PSYM-file symbol, if the PSYM-file symbol is not also referenced 
in that program; such symbolic usage cannot be a "forward" reference 
in the assembly program. To avoid confusion, however, it is best to 
treat the entire set of PSYM symbols as reserved symbols. 



5.1.1 ADDRESS REGISTERS 

All data reference in the system is made indirectly through one 
of the sixteen address registers (A/R) . Registers zero and one have 
special, firmware-defined meaning; the other fourteen may be considered 
general-purpose registers, with the limitation that system software 
conventions determine the usage of most A/R's. Registers zero and one 
should never be changed in any way by assembly programs., Register two 
always points to the SCB after the debugger has been entered. 

Register zero always addresses byte zero of the process' PCB; 
register one always addresses byte zero of the frame in which the 
process is currently executing. Thus all elements in the PCB may be 
relatively addressed using register zero as a base register; this 
includes the individual segments of the address registers themselves 
(e.g.,R15WA, referencing the word-address segment of R15) . Address 
registers can thus be setup explicitly by setting up their segments 
appropriately; the more conventional way of setting up an A/R is to 
move a S/R into it. For example, the sequences below are functionally 
identical. 
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FRM100 



ADDR 0,X'100' 



DEFINE A LITERAL S/R 
REFERENCING FRAME X'lOO 1 



MOV 



FRM100,R15 



and 

ZERO R15WA 

ZERO R15DSP 

MOV ^OX'SOOOOIOO* R15FID 

It is important to note that, in the first sequence, the address 
register is automatically set to the "detached" format when the "MOV" 
instruction executes; in the second sequence, the address register is 
explicitly set to the "detached" format by the "ZERO R15WA" instruction. 
The word=address of an A/R must be zeroed before other segments of the 
A/R are modified. 



5.1.2 ATTACHMENT AND DETACHMENT OF ADDRESS REGISTERS 

All instructions that reference data force "attachment" of the 
A/R(s) used in the reference. Not all instructions do the same; for 
example, the "increment A/R by tally" instruction will not cause a 
"detached" A/R to attach before execution. 

This point may lead to programming errors; consider the following 
sequence : 



LI BCU AM,R6,NXT R6 "ATTACHED" AT THIS POINT" 

L2 INC R6, SIZE R6 MAY "DETACH" DUE TO THIS INSTRUCTION 

L3 MOV R6, SPM SAVE R6 



The instruction at L2 may force R6 to "detach" (if the contents 
of SIZE are such that the resultant address is beyond the limits of 
the current frame) ; storing R6 in SR4 will then cause SR4 to have a 
large positive displacement, and a FID equal to that in R6 at the 
time of execution of the instruction at LI. Subsequently, a register 
comparison instruction of the form: 



BE 



R15,SR4,L20 
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may execute incorrectly due to the fact that if the FID's of R15 and 
SRA are unequal at the time of execution, it is assumed that the two 
frames are contiguously linked (See Section 3.14). Therefore, 
it is best to force "attachment" of R6 before L3; a conven- 
ient way of doing so is to execute the instruction: 



L3A FAR R6,0 

though any data reference instruction would serve as well., 

The following table summarizes the attachment/detachment process 



ATTACHMENT & DETACHMENT OF ADDRESS REGISTERS 



A/R is Attached 
when: 



A/R is Detached 
when : 








1 


2 


3 


4 


5 


6 


7 


r 





_ 


DI 


SP 


Flag 


F 


I 


D 


Word 
Address 


- 


Flag 


F 


I 


D 



(1) Any instruction 
that references 
data via the A/R 
is executed. 



(2) Execution of 
INC r 

DEC r 
instructions, 

(3) Execution of 
FAR r,n 
instruction. 



(1) Process is 
deactivated due 
to: terminal 
I/O; disk 1/0; 
peripheral I/O; 
timer run-out; 
monitor call. 

(2) A S/R is moved 
to the A/R. 



(3) Execution of 
INC r,t 
DEC r,t 



if a frame 
boundary is 
crossed. 



5.1.3 RE-ENTRANCY 

In practically all cases, the system software is re-entrant, that 
is, the same copy of the object code may be used simultaneously by more 
than one process. For this reason, no storage internal to the program 
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is utilized; instead the storage space directly associated with a 
process is used; :his is part of the process' Primary, Secondary, 
Debug (or Tertiary) and Quadrenary Control blocks. The Primary Control 
Block (PCB) is addressed via address register zero; the SCB via 
register two. The Debug Control Block is used solely by the Debug 
Processor as a scratch area, and should not be used by any other 
programs. The Quadrenary Control Block has no register addressing it; 
it is used by some system software (magnetic tape routines, for example) 
which temporarily setup a register pointing to it; its use is reserved 
for future software extensions. 

A user program may utilize storage internal to the program if it 
is to be used in a non-re-entrant fashion; however in most cases it 
will be found thai: the functional elements defined in the PSYM will 
be sufficient. 



In some cases it may be required to setup a program to be 
executable by only one process at a time; that is, the code is "locked" 
while a process is using it, and any other process attempting to execute 
the same code waius for the first process to "unlock" it. The following 
sequence is typical: 



ORG 

TEXT 

CMNT 




X'Ol' 



INITIAL CONDITION FOR LOCK BYTE 
(NOTE USAGE OF STORAGE INTERNAL TO 
PROGRAM) 



LOCK MCC 
XCC 
BCE 
RQM 
B 



X'00',R2 

R2,R1 

R2, X'OT, CONTINUE 

LOCK 



SET "LOCKED" CODE AT R2 
EXCHANGE BYTES AT R2 AND Rl 
OK TO CONTINUE; PROGRAM LOCKED 
WAIT (RELEASE QUANTUM) 
TRY AGAIN 



UNLOCK MCC X'Ol'jRl 



UNLOCK PROGRAM 



5.1.4 WORK-SPACES OR BUFFERS 

There is a set of work-spaces, or buffer areas, that is pre-defined 
and available to each process. If the system conventions with regard 
to these buffers are maintained, they should prove adequate for the 
majority of assembly programming. There are three "linked" buffers, 
or work-spaces, of equal size, symbolically called the IS, the OS, and 
the HS. These are at least 3000 bytes in length each; more space for 
each area can be assigned to a process at LOGON time. There are five 
other work-spaces, the BMS , CS, AF, IB and the OB which may vary between 
50 and 140 bytes in length, and are all in one frame. There is the TS, 
a one-frame unlinked work-space of 512 bytes, and the PROC work-space, 
2000 bytes in length which is used normally by the PROC processor alone; 



finally there are four additional frames (PCB+28 through PCB+31) that 
are unused by the system, and are freely available. PCB+28 is used 
internally by the RPG processor. 

Each work-space is defined by a beginning pointer and an ending 
pointer, both of which are storage registers (S/R's). When the process 
is at the TCL level, all these pointers have been set to an initial 
condition. At other levels of processing, the beginning pointers 
should normally be maintained; the ending pointers may De moved by 
system or user routines. The address registers (A/R ? s) that are named 
after these work-spaces (IS ,0S ,AF,etc. ) need not necessarily be main- 
tained within their associated work-spaces; however, specific system 
routines may reset the A/R to its associated work-space. The table 
below discusses these points for each work space. Note that, conven- 
tionally, a buffer beginning pointer addresses one byte before the 
actual location where the data starts. This is because data is usually 
moved into a buffer using one of the "move incrementing" type of 
instructions, which increment the A/R before the data movement. 



Work- 
space 



Location 
(offset 
from PC3) 



Size 



Linked? 



Remarks 



BMS 



50 



(disp.=0) 



No Normally contains an item-id 
when communicating with the 
disc file i/o routines. Typi- 
cally, the item-id is copied to 
the BMS area, starting at 
BMSBEG+1. BMS BEG may be moved 
to point within any scratch 
area. BMSEND normally points 
to the last byte of the item-id, 
BMS (A/R) is freely usable 
except when explicitly or 
implicitly calling a disc file 
i/o routine. 



AF 



4 
(disp.=50) 



50 



No This work-space is not used by 
any system subroutine, though 
the AF A/R is used as a scratch 
register. 



CS 4 100 

(disp.=100) 



No 



As above. 



IB 4 <140 
(disp.=200) 



No Is used by the terminal input 
routines to read data. IBBEG 
may be moved to point within 
any scratch area before use. 
IBEND conventionally points to 
the logical end of data. 
IB A/R is freely usable except 
when explicitly or implicitly 
calling a terminal input routine, 
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Location 
Work- (offset 
space from PCB) Size Linked? Remarks 

OB A 140 No Is used by the terminal output 

(disp.=201 routines to write data. 

+ IBSIZE) OBBEG & OBEND should not be 

altered; they always point to 
the beginning and end of the 
OB area. OB A/R conventionally 
points one before the next 
available location in the 
OB buffer. 

TS 5 511 No This work-space is used 

by the RPG compiler. 



PROC 6-9 2000 Yes Used exclusively by the PROC 

Processor for working storage. 
User-exits from Proc's may 
change pointers in this area. 

HS 10-15 3000+ Yes Used as a means of passing 

messages to the WRAPUP processor 
at the conclusion of a TCL 
statement. May be used as a 
scratch area if there is no 
conflict with the WRAPUP 
history-string formats. 
HSBEG should not be altered; 
HSEND conventionally points one 
byte before the next available 
location in the buffer (initial 
condition is HSBEG=HSEND) . 
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Work- 
space 

IS 
OS 



Location 
(offset 
from PCB) 

16-21 
22-27 



Size Linked? 



3000+ 



Yes 



Remarks 



These work-spaces are used 
interchangeably by some system 
routines since they are of the 
same size (and are equal in 
size to the HS) . Specific 
usage is noted under the various 
system routines. 

ISBEG and OSBEG should not be 
altered, but may be inter- 
changed if necessary. 

Initial condition is that ISEND 
and OSEND point 3000 bytes past 
ISBEG & OSBEG respectively (not 
at the true end if additional 
work-space is assigned at 
LOGON time) . 

IS & OS A/R's are freely usable 
except when calling system sub- 
routines that use them. 



28-31 



Used for compilation and exe 
cution of RPG programs, but 
are otherwise available. 



5.1.5 DEFINING A SEPARATE BUFFER AREA 

If it is required to define a buffer area that is unique to a 
process, the unused frames PCB+28 through PCB+31 may be used. The 
following sequence of instructions is one way of setting 
up an A/R to a scratch buffer: 



MOV 


R0,R15 


ZERO 


R3WA 


ZERO 


R3DSP 


INC 


R3FID,29 



SET R3 "DETACHED" 

INITIALIZE DISPLACEMENT FIELD 

SET R15 TO PCB+29 



Register 3 can now be used to reference buffer areas, or functional 
elements that are addressed relative to R3 . None of the system 
subroutines use R3 , so that a program has to setup R3 only once in 
the above manner. However, exit to TCL via WRAPUP will reset R3 
to PCB+3. 
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5.1.6 USAGE OF XMODE 



In several cases, the multiple-byte move instructions 
used (say, when building a table) even when it is not known 
there is enough room in the current linked frame set to hoi 
Normally, if the end of a linked frame set is reached, DEBU 
entered with a "forward link zero" abort condition. Howeve 
XMODE may be setup to contain a mode-id of a user-written s 
that will gain control under such a condition. This subrou 
then process the end-of-frame condition, and, by executing 
instruction, normal processing will continue. Instructions 
be handled by this scheme are: INC register; MCI; MIC; Mil 
SCD; MIIR. Care should be taken in the case of MIIR to sav 
R15 in the subroutine. MIIT cannot be handled because DEBU 
the accumulator in the process of transferring control via 



can be 

whether 
d the data. 
G is 

r, the tally 
ubroutine 
tine, can 
a 'RTN' 

then can 
; MUD; 
e register 
G destroys 
XMODE. 



For example 



MOV XXX, XMODE 
Mil R12,R13,SR4 
ZERO XMODE 



SETUP XMODE FOR NEXT INSTRUCTION 
COPY FROM R12 TO R13, TILL R12=SR t f 



!XXX 



OK 



bGHJ 
MOV 


R15, SRI 


SRA 


R15, ACF 


BCE 


X'0D',R15,OK 


MOV 


0, XMODE 


ENT 


5,DB1 


CMNT 




MOV 


500,R13DSP 


CMNT 





ENTRY POINT FOR SUBROUTINE 

SAVE R15 

SET TO SAVE REGISTER NUMBER 

ENSURE TRAP WAS DUE TO R13 

PREVENT DEBUG RE-ENTRY 

NO! : REENTER DEBUG TO PRINT 

"FORWARD LINK ZERO" MESSAGE 



RESET DISPLACEMENT FIELD OF R13, SINCE 
FIRMWARE HAS LEFT IT IN A STRANGE STATE 



HANDLE END-OF-FRAME CONDITION HERE 

MOV R13FID, RECORD SETUP INTERFACE FOR ATTOVF 

BSL ATTOVF GET ANOTHER FRAME FROM OVERFLOW 



MOV SR1,R15 

RTN 



RESTORE R15 

RETURN TO CONTINUE EXECUTION OF 

Mil INSTRUCTION. 
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5.1.7 INITIAL CONDITIONS 

At any level in the system, the following elements are assumed 
to be setup; they should not be altered by any programs: 







Contain base-FID, modulo and separation 
of the M/DICT associated with the process. 



MBASE D 
MMOD T 
MSEP \ 

USER T Contains the low-order 16 bits or the base-FID 
of the M/DICT. 



5.1.8 SPECIAL PSYM ELEMENTS 

Certain elements have a "global" significance to the system; 
in addition to those described above they are: 



Functional Element 

Arithmetic condition 
flags : 



Description 

These are altered by any arithmetic instruction, 
as well as the branch instructions that compare 
two relatively addressed fields. 



ZROBIT 
NEGBIT 
OVFBIT 



Set if result of operation is zero (equal). 
Set if result of operation is negative. 
Set if arithmetic overflow resulted. 



HO through H7 



Overlays accumulator and extension; H7 is 
high-order byte of Dl; HO is low-order byte 
of DO. 



INHIBIT 



If set, the "BREAK" key on the terminal is 
inhibited; used by processes that should not 
be interrupted. 



OVRFLCTR 
RSCWA 



See WRAPUP for usage. 

Return-stack current word address; contains 
address one byte past current entry in stack; 
stack is null if RSCWA=X' 184' . 



RSEND 



Return-stack ending address; contains address 
one byte past last allowable entry in stack; 
for a stack depth of 11 entries, RSEND=X' 1B0' . 



SYSPRIV1 
SYSPRIV2 



If set indicates system privileges, level one. 

If set in addition to SYSPRIV1, indicates 
system privileges, level two. 
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Functional Element 
TO through T3 
XMODE 



WMODE 



USER 



Description 

Overlays accumulator and extension. 

This tally may be setup to a mode-id of a 
subroutine that is to gain control whan a 
"forward link zero" condition occurs. 

If WMODE is non-zero on any entry to 
WRAPUP, a BSL* thorugh WMODE will be 
executed at the termination of history- 
string processing, before 1) the print- 
spool -files are closed, and 2) the 
overflow chain is released. The BSL* 
instruction will be executed whether 
RMODE is zero or not. This feature 
may be used by processors that require 
special wrapup processing. 

Tally 'USER' in the PCB has global 
s ignif i cance : 

Tally=0 Indicates not loged on. 

Tally=-1 Indicates the spooler 

process . 

Tally=l Indicates the file 
restore process. 

Tally=2 Indicates a process 

which must go to LOGOFF 
after WRAPUP processing. 

Other values indicate normal 
logged on processes. 
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5.1.9 PROGRAM DOCUMENTATION CONVENTIONS 

In the following documentation, the functional description briefly 
describes the action taken by the routine. Unless otherwise specified, 
the program described is called as a subroutine, using the BSL 
instruction, and it returns to the calling program via a RTN (return) 
instruction. 

The Input Interface, Internal Usage, and Output Interface sections 
describe the elements used by the subroutine. The single letter 
following the element name describes its type (C=character , D=double 
word, H=half word, R=address register, S=storage register, T=word) . 
Unless otherwise specified, it should be assumed that the following 
elements may be internally destroyed by the routine: 



Registers 
Storage Registers 
Tallies 
Bits 



R14 and R15 . 

SYSRO, SYSR1, SYSR2. 

Accumulator (DO, Dl) , D2 , T4, T5. 

Arithmetic condition flags, SB60, SB61. 



If no description follows the element name, it indicates that the 
element is used as a scratch element. 

The system delimiters are symbolically referred to as: 

Hex. value Name and description 



FF 


SM 


Segment Mark. 


FE 


AM 


Attribute Mark. 


FD 


VM 


Value Mark. 


FC 


SVM 


Secondary Value Mark. 


FB 


SB 


Start Buffer. 
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5.1.10 OVERALL VIEW OF SYSTEM SOFTWARE LINKAGE 



PROC 
PROCESSOR 



T 



FROM 
COLD-START 



OFF 
VERB 



LOGOFF 
PROCESSOR 



TCL 
PROCESSOR 



PROCESS 
INITIALIZATION 



tcl-i verbs 
(time, dump, etc.) 



■x- 



ENGLISH VERBS 
(LIST, SORT, ETC. 1 ) 



I 



ENGLISH 
PRE-PROCESSOR 



± 



ENGLISH 

SELECTION 

PROCESSOR 



7f*;* 



*%X 



LOGON 
PROCESSOR 



LOGON 



TCL-II VERBS 
(EDIT, COPY, ETC.) 



TCL-II pf~~ 
PROCESSOR 



FROM ANY 
PROCESSOR 



A 



t 



T 



<- 



GO 



_J 



OFF 



DEBUG 
PROCESSOR 



##■ 



-^^ 



± 



WRAPUP PROCESSOR 



<+ 



END 



*TCL-I processors 

* * TC I. - 1 1 processors 

* * * EX GL I SI I p ro ce s sors 
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5.1.11 PRIMARY CONTROL BLOCK 

Addressing register RO set to PCB . Areas bordered by heavy lines 
are accessed by hardware. Shaded areas are reserved for future 
system software use. 



, 




, J 


1 


9 


3 


4 


5 


6 


7 


8 9 

1 






A B 
1 


C 


D 


E 




F 




000 




ACF 


prmpc 


SCO 


SCI 


SC2 


DEBUG USE 


1 


Dl 


1 


l 1 
DO 


010 


ABIT ETC ... BITS 


TAP STW 


JOBITS 


DACF 


020 


CHO 


CHI 


CH2 


CH3 


CH4 


CH8 


CH9 


SCP 


T4 


T5 


T6 


T7 


030 


D2 


D3 


D4 


D5 


040 


RECORD 


FRMN/LINQUE 


FRMP 


NNCF 


NPCF 


SIZE 


050 


BASE 


MODULO 


SEPAR 


DBASE 


DMOD 


DSEP 


060 


MBASE 


MMOD 


MSEP 


EBASE 


EMOD 


ESEP 


070 


c.VKn. y 





1 


SBASE 


SHOD 




SSEP 






MODI 




080 


LOCK 
BITS 




•:.'• ^■■•■:v:= : i 


1D2 


WMODE 


RMODE 


M0DEID3 


XMODE 


USER 


090 


CTRO 


CTRl 


CTR2 


CTR3 


CTR4 


CTR5 


CTR6 


CTR7 


0A0 


CTR8 


CTR9 


CTR10 


CTR11 


CTR12 


CTRl 3 


CTR14 


CTRl 5 


0B0 


REJCTR 


REJO 


IBSIZE 


OBSI/.E 


HSBEG 




OCO 


HSEND 


ISBEG 


ISEND 


0D0 


OSBEG 


OSEND 


TSBEG 


0E0 




TSEND 


L'PDBEC 


1 


0F0 


UPDF.ND 


KMSBEG 


BMSEND 


100 


ROWA 


RODSP 


ROFID 


REGISTER ONE 


110 


REGISTER 'TnO R., = SCB 


REGISTER THREE R 3 =HS 


120 


REGISTER -OUR 1< 4 =IS 






REGISTER FIVE R 5 =OS 






130 


REGISTER SIX R(,= 1R 


REGISTER SEVEN R ? =UPD 


140 


REGISTER EIGHT R fi =BMS 


rf:gister nine r 9 =af 


150 


REGISTER "EN I<lq =1b 


REGISTER ELEVEN R 1 =OB 


160 


REGISTER "UELVE R ]2 =CS 






REGISTER THIRTEEN Ri3=TS 






170 


REGISTER FOURTEEN R ^ 


REGISTER FIFTEEN R 15 


180 


RSEND 


RSCWA 


(FID) 


(DISP) 






190 










1A0 










1B0 


AFBEG 


A FEN I) 


CSBEG 
I 


ICO 




CSEND 






IB BEG 




1D0 


1BEND J OBBEG 






OBEND 


1E0 


IRBEG 


I REND 




SYSRO 




1FO 




SYSRI. 






R3SAVE 




-# ; 




1 





































ADDRESS INI 



RETURN 

STACK 

ENTRIES 
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5.1.12 SECONDARY CONTROL BLOCK 

Addressing register R2 set to SCB. SCB = PCB +1 














































1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 





000 




BSP 


CI 


C2 


C3 


C4 


C5 


C6 


C7 


010 


C8 


C9 


CTR16 


CTR17 


0TR18 


CTR19 


CTR20 


CTR21 


— 




CTR22 


CTR2 3 


CTR24 


CTR2 5 


CTR26 


CTR27 


CTR2 8 


CTR29 


030 


CTR30 


CTRJ1 


CTR32 


CTR31 


CTR34 


CTR35 


CTR36 


CTR37 





040 


CTR38 


CTR39 




CTR40 


CTR41 


CTR42 






0*iO 




NEXT 


FP1 




I) 


IT 2 




060 




FP3 




D6 




7 


1)8 




070 




D9 


RF. J 1 


RE.J2 








080 




SYSR2 






NXTITM 


SO 


090 






SI 


S2 






0A0 


S3 




S4 




SS 


OBO 


S6 


S7 


S8 


OCO 




S9 


SRO 




ono 


SRI 






SR2 


SR3 


OF.O 




SR4 




SRS 


SR6 


OFO 




SR7 


SRS 




1011 


SR9 




_E__. 


SR10 




SR11 


1 10 




SR12 


15 




SR13 


SRI4 


120 






SK 




SRlb 






1 to 






SRI 8 






SR19 




140 




SR20 






SR21 


SR2 2 


150 






SR2 3 


SR24 




! 


lhO 


SR25 






SR26 


SR2 7 


1 /O 


sr,:h 


SR29 


PQBEG 


180 






1'^Cl'R 


PQKNI) 


1 


1 


190 


STKINP 




STKBKi; 




SR35 


1A0 


I.OCKSR 




ASKEG 


AS1 NO 


1B0 




ASTR 


11 


1 


ICO 


I 1BF.G 






1 I END 




PBHFBF.G 




100 




PBliF 


1 


PBOFENO 


OVIT.CTR 





1F0 






CHAR IN' 


GI1AR0UT 


I.1NKS0UT 


CTR 


1F0 


paonum 


FAGHKA1) 


L1HCTR 


PAGSIZK 


PAGSK1P 


IT 
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5.1.13 DEBUG CONTROL BLOCK 
PCB save areas. DCB = PCB + 2 



1 

— I — 



000 

010 

020 

030 

040 

050 

060 

070 

080 

090 

0A0 

OBO 

OCO 

ODO 

OEO 

OFO 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

1A0 

1B0 

ICO 

1D0 

1E0 

1F0 
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5.1.14 PSYM 



PSYM D/CCDE.. LINE 2 LINE 3 



PSYM D/CODE.. LINE 2 LINE 3 



ABIT 

ACF 

AF 

AFBEG 

AFDSP 

AFEND 

AFFID 

AM 

ASBEG 

A5END 

ASTR 

ATTACH 

BO 

B13 

B15 

B30 

B31 

B4 

BASE 

BBIT 

BITS 

BKBIT 

BMS 

BMSBEG 

BMSDSP 

BMSEND 

BMSFID 

BMSWA 

BSPCH 

CI 

C2 

C3 

C4 

C5 

C6 

C7 

C8 

C9 

CBBIT 

CBIT 

CCDEL 

CHO 

CHI 

CH2 

CH3 

CH4 

CH8 

CH9 



B 
H 
R 
S 
T 
S 
D 
N 
S 

s 
s 

B 
B 
B 



D 

B 

C 

B 

R 

S 

T 

S 

D 

T 

C 

T 

T 

T 

T 

T 

T 

T 

T 

T 

B 

B 

B 

C 

C 

C 

C 

C 

C 

C 



COLHDRSUPP B 



CR 



N 



080 

001 

009 

0D8 

0A5 

ODB 

0A6 

OFE 

0D3 

0D6 

0D9 

0F2 

07F 

072 

070 

061 

060 

07B 

028 

081 

010 

09B 

008 

07A 

0A3 

07D 

0A2 

0A0 

001 

001 

002 

003 

004 

005 

006 

007 

008 

009 

0D0 

082 

OEB 

020 

021 

022 

023 

024 

025 

026 

OCB 

00D 







9 











2 

2 

2 























8 











2 

2 

2 

2 

2 

2 

2 

2 

2 

2 



























CS 

CSBEG 

CSDSP 

CSEND 

CSFID 

CSWA 

CTR 

CTRO 

CTR1 

CTR10 

CTR 11 

CTR 12 

CTR13 

CTR14 

CTR 15 

CTR16 

CTR 17 

CTR 18 

CTR19 

CTR2 

CTR20 

CTR21 

CTR22 

CTR23 

CTR24 

CTR25 

CTR26 

CTR27 

CTR28 

CTR29 

CTR3 

CTR30 

CTR31 

CTR32 

CTR33 

CTR34 

CTR35 

CTR36 

CTR37 

CTR38 

CTR39 

CTR4 

CTR40 

CTR41 

CTR42 

CTR5 

CTR6 

CTR7 

CTR8 

CTR9 



R 
S 

T 
S 

D 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 

T 



ooc 


C 


ODE 





OBI 





0E1 





0B2 





0B0 





048 





048 





049 





052 





053 





054 





055 





056 





057 





00A 


2 


00B 


2 


OOC 


2 


00D 


2 


04A 





00E 


2 


OOF 


2 


010 


2 


Oil 


2 


012 


2 


013 


2 


014 


2 


015 


2 


016 


2 


017 


2 


04B 





018 


2 


019 


2 


01A 


2 


01B 


2 


01C 


2 


01D 


2 


01E 


2 


OIF 


2 


020 


2 


021 


2 


04C 





022 


2 


023 


2 


024 


2 


04D 





04E 





04F 





050 





051 






(CURRENT LISTING TO BE SUPPLIED) 
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PSYM D/CODE.. LINE 2 LINE 3 



DO 


D 


Dl 


D 


D2 


D 


D3 


D 


D4 


D 


D5 


D 


D6 


D 


D7 


D 


D8 


D 


D9 


D 


DACF 


H 


DAF : 1 


B 


DAF10 


B 


DAF2 


B 


DAF3 


B 


DAF4 


B 


DAF5 


B 


DAF6 


B 


DAF7 


B 


DAF8 


B 


DAF9 


B 


DATEQ 


T 


DBASE 


D 


DBIT 


B 


DBLSPC 


B 


DEBUG5 


B 


DEBUG6 


B 


DEBUG7 


B 


DEBUGBYTE 


H 


DISKERR 


B 


DMOD 


T 


DSEP 


T 


EBASE 


D 


EBIT 


B 


ECONVBIT 


B 


EMOD 


T 


ENDBIT 


B 


EOFBIT 


B 


EOTBIT 


B 


ESEP 


T 


FBIT 


B 


FP1 


D 


FP2 


D 


FP3 


D 


FRMN 


D 


FRMP 


D 


GBIT 


B 


GMBIT 


B 


HO 


H 


HI 


H 



006 





H2 


H 


004 





H3 


H 


018 





H4 


H 


01A 





H5 


H 


01C 





H6 


H 


01E 





H7 


H 


033 


2 


HBIT 


B 


035 


2 


HDRSUPP 


B 


037 


2 


HS 


R 


039 


2 


HSBEG 


S 


OIF 





HSEND 


S 


0D1 





H7 


H 


0C7 





IB 


R 


0D2 





IBBEG 


S 


0D3 





I BEND 


S 


0D4 





IBFID 


D 


0D5 





IBIT 


B 


0D6 





IBSIZE 


T 


0D7 





IBWA 


T 


0D8 





IDSUPP 


B 


0D9 





II 


S 


040 





IIBEG 


S 


02C 





1 1 END 


S 


083 





INDEBUG 


B 


OCA 





INHIBIT 


B 


035 





INHIBITSV1 


B 


036 





INHIBITSV2 


B 


037 





IOBIT14 


B 


006 





IOBIT2 


B 


0F6 





IOBIT4 


B 


02F 





IR 


R 


02F 





IRBEG 


S 


034 





IRDSP 


T 


084 





I REND 


S 


OCF 





IRFID 


D 


036 





IRWA 


T 


09A 





IS 


R 


03A 





IS BEG 


S 


0E1 





ISDSP 


T 


037 





I SEND 


S 


085 





ISFID 


D 


02A 


2 


ITAPEBIT 


B 


02D 


2 


JBIT 


B 


030 


2 


KBIT 


B 


022 





LBIT 


B 


024 





LF 


N 


086 





LFCTR 


T 


09C 





LFDLY 


T 


OOF 





LINCTR 


T 


OOE 





LINESOUT 


D 



PSYM D/CODE.. LINE 2 LINE 3 



00D 





OOC 





00B 





00A 





009 





008 





087 





0C9 





003 


3 


05C 





05F 





009 





00A 


B 


0E4 





0E7 





OAA 





088 





05A 





0A8 





0C6 





ODC 


2 


ODF 


2 


0E2 


2 


OF3 





OFu 





ODA 





ODB 





0F6 





OEA 





OEC 





006 


6 


0F0 





099 





0F3 





09A 





098 





004 


4 


062 





091 





065 





092 





OCE 





089 





08A 





088 





00A 





OFF 


2 


OFF 


2 


OFC 


2 


0F6 


2 



(CURRENT LISTING TO BE SUPPLIED) 
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PSYM 


. D/CODE.. 


, LINE 2 


LINE 3 


PSYM 


. D/CODE.. 


, LINE 2 


LINE 3 


LINQUE 


D 


022 





PBUFEND 


S 


OEB 


2 


LISTFLAG 


B 


0F1 





PQBEG 


S 


OBE 


2 


LOCK 


H 


ono 





PQCUR 


S 


OC1 


2 


LOCKSR 


S 


0D0 


2 


PQEND 


S 


0C4 


2 


LPBIT 


B 


OCD 





PQFLG 


B 


ODE 





MBASE 


D 


030 





PRMPC 


C 


002 





MBIT 


B 


03C 





PROTECT 


B 


0E0 





MMOD 


T 


032 





PTIME 


T 


025 


2 


MODEID2 


T 


042 





QBIT 


B 


090 





MODEID3 


T 


045 





QSTR 


S 


0E8 


2 


MODULO 


T 


02A 





RO 


R 


000 





MSEP 


T 


033 





RODSP 


T 


081 





NBIT 


B 


08D 


B 


ROFID 


D 


082 





NEGBIT 


B 


00E 





ROWA 


T 


080 





NEXT 


T 


029 


2 


Rl 


R 


001 


1 


NNCF 


H 


04C 





R10 


R 


00A 


A 


NOB IT 


B 


09A 





R10FID 


D 


0AA 





NOBLNK 


B 


0EE 





R10WA 


T 


0A8 





NPCF 


H 


04D 





Rll 


R 


00B 


B 


NREC 


D 


020 


2 


R11DSP 


T 


OAD 





NXTITM 


2 


043 


2 


RI1FID 


D 


0A3 





OB 


R 


00B 


B 


R11WA 


T 


OAC 





OBBEG 


S 


0EA 





R12 


R 


00C 


C 


OBDSP 


T 


0AD 





R12DSP 


T 


OBI 





OBEND 


S 


OED 





R12FID 


D 


0B2 





OBFID 


D 


0AE 





R12WA 


T 


0B0 





OBIT 


B 


08E 





R13 


R 


00D 


D 


OBSIZE 


T 


05B 





R13DSP 


T 


0B5 





OBWA 


T 


0AC 





R13FID 


D 


0B6 





OS 


R 


005 


5 


R13WA 


T 


0B4 





OSBEG 


S 


068 





R14 


R 


00E 


3 


OSBEGF 


D 


069 





R14DSP 


T 


0B9 





OSDSP 


T 


095 





R14FID 


D 


OBA 





OSEND 


S 


06B 





R14WA 


T 


OBC 





OSFID 


D 


096 





R15 


R 


OOF 


F 


OSWA 


T 


094 





R15DSP 


T 


OBD 





OVFBIT 


B 


OOF 





R15FID 


D 


OBE 





OVRFLCTR 


D 


0EE 


2 


R15WA 


T 


OBC 





OVRFLW 


D 


038 





R2 


R 


002 


2 


OVRFLWO 


Z 


006 


E 


R2DSP 


T 


089 





PAGFRMT 


B 


OCC 





R2FID 


D 


08A 





PAGHEAD 


S 


0F9 


2 


R2WA 


T 


088 





PAGINATE 


B 


0F7 





R3 


R 


003 


3 


PAGNUM 


T 


0F8 


2 


R3DSP 


T 


08D 





PAGSIZE 


T 


0FD 


2 


R3FID 


D 


08E 





PAGSKIP 


T 


0FE 


2 


R 3 SAVE 


S 


OFC 





PARITY 


B 


0E4 





R3WA 


T 


08C 





PBIT 


B 


08F 





R4 


R 


004 


4 


PBUF 


S 


0E8 


2 


R4DSP 


T 


091 





PBUFBEG 


S 


0E5 


2 


R4FID 


D 


092 






(CURRENT LISTING TO BE SUPPLIED) 
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PSYM. 



D/CODE.. LINE 2 LINE 3 



PSYM D/CODE.. LINE 2 LINE 3 



R4WA 

R5 

R5DSP 

R5FID 

R5WA 

R6 

R6DSP 

R6FID 

R6WA 

R7 

R7DSP 

R7FID 

R7WA 

R8 

R8DSP 

R8FID 

R8WA 

R9 

R9DSP 

R9FID 

R9WA 

RBIT 

RECORD 

REJO 

REJ1 

REJ3 

REJ4 

RE J 5 

REJCTR 

RMBIT 

RMODE 

RNIBIT 

RNICTR 

RSCWA 

RSEND 

RTNSTK 

SO 

SI 

S2 

S3 

S4 

S5 

S6 

S7 

S8 

S9 

SB 

SBO 

SB1 

SB10 



T 
R 
T 
D 
T 
R 
T 
D 
T 
R 
T 
D 
T 
R 
T 
D 
T 
R 
T 
D 
T 
B 
D 
T 
T 
T 
T 
T 
T 
B 
T 
B 
H 
T 
T 
T 
S 
S 

s 
s 
s 
s 
s 
s 
s 
s 

N 
B 
B 
B 



090 
005 
095 
096 
094 
006 
099 
09A 
098 
007 
09D 
09E 
09C 
008 
0A1 
0A2 
0A0 
009 
0A5 
0A6 
0A4 
091 
020 
059 
03B 
03D 
03E 
03F 
058 
09E 
044 
033 
007 
0C1 
0C0 
0C2 
046 
049 
04C 
04F 
052 
055 
058 
05B 
05E 
061 
OFB 
0A0 
0A1 
OAA 



SB11 

SB12 

SB13 

SB14 

SB15 

SB16 

SB17 

SB18 

SB19 

SB2 

SB20 

SB21 

SB22 

SB23 

SB24 

SB25 

SB26 

SB27 

SB28 

SB29 

SB3 

SB30 

SB31 

SB32 

SB4 

SB5 

SB6 

SB60 

SB61 

SB7 

SB8 

SB9 

SBASE 

SBIT 

SCO 

SCI 

SC2 

SCP 

SEPAR 

SIZE 

SM 

SMBIT 

SMCONV 

SMOD 

SRO 

SRI 

SR10 

SR11 

SR12 

SR13 



OAB 





OAC 





OAD 





OAE 





OAF 





0B0 





OBI 





0B2 





0B3 





0A2 





0B4 





0B5 





0B6 





0B7 





0B8 





0B9 





OBA 





OBB 





OBC 





OBD 





OAE 





OBE 





OBF 





OCO 





0A4 





0A5 





0A6 





ODC 





ODD 





0A7 





0A8 





0A9 





03C 





092 





003 





004 





005 





027 





02B 





027 





OFF 





09F 





OED 





03E 





064 


2 


067 


2 


082 


2 


085 


2 


088 


2 


08B 


2 



(CURRENT LISTING TO BE SUPPLIED) 
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PSYM 



SR14 


S 


SR15 


s 


SR16 


s 


SR17 


s 


SR18 


5 


SR19 


S 


SR2 


5 


SR20 


5 


SR21 


S 


SR22 


S 


SR23 


S 


SR24 


5 


SR25 


S 


SR26 


S 


SR27 


S 


5R28 


S 


5R29 


S 


SR3 


s 


SR35 


s 


SR4 


s 


SR5 


s 


SR6 


s 


SR7 


s 


SR8 


s 


SR9 


s 


S5EP 


T 


STKBEG 


s 


STKFLG 


B 


STKFLGX 


B 


STKINP 


S 


SVM 


N 


SYSPRIV1 


B 


SYSPRIV2 


B 


SYSRO 


S 


SYSR1 


s 


SYSR2 


5 


TO 


T 


Tl 


T 


T2 


T 


T3 


T 


T4 


T 


T5 


T 


T6 


T 


T7 


T 


TAPSTW 


C 


TBIT 


B 


TPRDY 


B 


TS 


R 


TSBEG 


S 


TSDSP 


T 



D/CODE 



LINE 2 LINE 3 



PSYM, 



08E 


2 


TSEND 


S 


091 


2 


TSWA 


T 


094 


2 


TTLY 


T 


097 


2 


TYMO 


T 


09A 


2 


UBIT 


B 


09D 


2 


UPD 


R 


06A 


2 


UPDBEG 


S 


0A0 


2 


UPDDSP 


T 


0A0 


2 


UPDEND 


S 


0A6 


2 


UPDF1D 


D 


0A9 


2 


UPDWA 


T 


OAC 


2 


USER 


T 


OAF 


2 


VBIT 


B 


0B2 


2 


VM 


N 


0B5 


2 


VOBIT 


B 


0B8 


2 


VT 


N 


OBB 


2 


WBIT 


B 


06D 


2 


WMBI'i 


B 


OCD 


2 


WMODE 


T 


070 


2 


XBIT 


B 


073 


2 


XMODE 


T 


076 


2 


XNFID 


D 


079 


2 


XNLOCK 


H 


7C 


2 


XNNCF 


H 


07F 


2 


XNPCF 


H 


03F 





XNRES 


H 


OCA 


2 


XPFID 


D 


0E8 





YBIT 


B 


0E9 





ZBIT 


B 


0C7 


2 


ZEROBIT 


B 


OFC 









0F4 









OEF 









0F6 









0F9 









040 


2 






007 









006 









005 









004 









014 









015 









016 









017 









01C 









093 









0E7 









OOD 


D 






06E 









0B5 










D/CODE. . LINE 2 LINE 3 



071 
0B4 
003 
022 
094 
00 7 
074 
09D 
077 
09E 
09C 
047 
095 
OFD 
ODF 
OOB 
096 
09D 
043 
097 
046 
001 
000 
001 
00A 
OOB 
00 3 
098 
099 
OOD 



(CURRENT LISTING TO BE SUPPLIED) 
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5.2 TCL PROCESSORS AND PROC INTERFACE 

5.2.1 VERB FORMAT 

A verb is an entry in the master dictionary whose D/CODE begins with 
the character "P". The special sequence "PQ" is reserved, and defines 
a PROC; otherwise the format of the verb is as defined below. The 
verb contains three mode-id's - hexadecimal character fields that 
specify the transfer of control from one processor to another. The 
first mode-id is mandatory and specifies the location to which TCL-I 
transfers control after editing the input statement; the second mode-id 
is also mandatory for TCL-II and ENGLISH verbs, and specifies a secondary 
processor exit. The third mode-id is usually optional. In addition, an 
option string may be present for TCL-II verbs. 



Verb Format: 

Attribute 
Number 



Description 

"Px"; x is a single character 
(hot "Q") stored in the 
character register SCP . 
X may be null. 

Primary mode-id, to which 
TCL-I transfers control. 



Examples 

LIST verb: PA 
COUNT verb: PB 



ALL ENGLISH verbs: 35 
ALL TCL-II verbs: 2 



Secondary mode-id; stored 
in the tally M0DEID2 

Tertiary mode-id; stored 
in the tally M0DEID3 

Option string, for TCL-II 
verbs (see TCL-II 
documentation) 



EDIT verb: D 
ASSEMBLE verb: 17 
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5.2.2 TCL-I 

Functional Description 

TCL-I is the basic entry point (not a subroutine) for the. terminal 
control language process. It is entered solely from the WRAPUP 
processor after WRAPUP has completed processing of the previous TCL 
statement . 

The primary functions of the TCL-I processor are as follows: 

1) Determine if a PROC is in control, and if it is, exit to 
the PROC processor for continuation of the PROC. 

2) If not, obtain a line of input from the terminal. 

3) Attempt to retrieve the verb (first set of contiguous 
non-blank data in the input buffer) from the master dictionary 
and validate it as such. 

4) Set up the parameters from the verb; edit and copy the 
remainder of the data in the input buffer to the work-space 
IS. 

5) Exit: to the processor specified in the primary mode-id 
parameter of the verb. 



Editing Features 

1) All control characters, and system delimiters (SB, SM, AM, 
VM, SVM) in the input buffer are ignored. 

2) Redundant blanks (sequence of two or more blanks) are not 
copied, except in strings enclosed by single or double 
quote signs. 

3) Strings enclosed in single quote signs are copied as: 
(SM) I string (SB) 

4) Strings enclosed in double quote signs are copied as: 
(SM) V string (SB) 

5) End of data is marked with a: (SM) Z 

Output Interface 

ISBEG S Defines start of work space where edited 
input data has been copied. 
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IS 


R 


IR 


R 


SR4 


S 


IBBEG 


S 


IB 


R 


I BEND 


S 


SCP 


C 


SCO 


C 


SCI 


C 


SC2 


C 


MODEID2 


T 


MODE ID 3 


T 



IBIT 



VBIT 



PQFLG 

BASE 

MODULO 

SEPAR 



} 



B 



=ISBEG 

Points to AM following attribute 4 of the verb, 
or to end-of-data AM of verb. 

Points to AM at end-of-data of verb. 

Points to start of last input line from terminal. 

Points to SM terminating input line. 

As above. 

Contains character following "P" in verb 
attribute one; blank if none specified. 

Contains a blank 

Contains a blank 

Contains a SB 

Contains secondary mode-id from verb; zero if 
none specified. 

Contains tertiary mode-id from verb; zero if none 
specified. 

Set if any string enclosed by single-quote signs 
has been found. 

Set if any string enclosed by double-quote signs 
has been found. 

Set if a PROC is in control. 



Contains base-FID, modulo and separation of 
of master dictionary. 



All other bits are zero (A through Z bit and SBO through SB32. All 
other process work-space pointers are set to their initial condition 
(See Section 5.8.1.) 



Subroutines Used 



RET IX: CVTHIR 
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Error Conditicns 

The following cause an exit to the WRAPUP processor with the message 
indicated: 

271: One PROC cannot call another 

3: Verb cannot be identified in the M/DICT. 

30: Verb format error. (Premature end-of-data, non-hex 
character in mode-id's) 

2: Uneven number of single or double quote signs in input 
data. 
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5.2.3 TCL-II 
Functional Desc ription 

TCL-II is entered from TCL-I by those verbs requiring access to a file, 
and to all, or explicitly specified items, from the file. TCL-II exits 
to the processor whose mode-id is specified in M0DEID2; typically 
processors such as the EDITOR, ASSEMBLER, LOADER, etc. use TCL-II to 
feed them the set of items which was specified in the input data 

On entry, TCL-II checks the verb definition for a set of option 
characters (in attribute 5 of the verb); verb options are single 
characters as below; any combination may be specified. 

Option Character Meaning 



C Copy - the item retrieved is copied to 

the workspace IS. 

F File access only - the item-list is 

ignored; only the file parameters are set 
up by TCL-II. If this option is present, 
any others are ignored. 

N New item acceptable - if the item specified 

is not on file, the secondary processor 
still gets control (example: the EDITOR 
can process a new item) . 

P Prints item-id on a full-file retrieval, 

as each item is retrieved. 

U Updating sequence flagged - if items are 

to be updated as retrieved, this option is 
mandatory. 

Z Final entry - the secondary processor will 

be entered once more after all items have 
been retrieved (example: COPY processor, 
to print a message). 

The input data string to TCL-II consists of the file-name (optionally 
preceded by the modifier DICT, which specifies access to the dictionary 
of the file), followed by a list of items, or an asterisk (*) specify- 
ing retrieval of all items on the file. The item-list may be followed 
by an option list (options to the secondary processor) which must be 
enclosed in parentheses. These options must consist of a sequence of 
single characters, or a decimal number, or two decimal numbers separ- 
ated by a minus sign (specifying a range of numbers). Multiple 
options are separated by commas. The option characters A through Z set 
the corresponding bits ABIT through ZBIT (A sets ABIT, etc.); the 
numbers are stored in tallies D4 and D5, and the bit NOBIT set if the 
numerical option is found. 
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Output Interface 



DAF1 


B 


DAF2 


B 


DAF3 


B 


DAF4 


B 


DAF5 


B 


DAF6 


B 


DAF8 


B 



RMBIT 



BASE 


D 


MODULO 


T 


SEPAR 


T 


SBASE 


D 


SMOD 


T 


SSEP 


T 



IS 



DBASE 


D 


DMOD 


T 


DSEP 


T 



} 
} 

} 



Set if update option was found. 

Set if "C" otpion was found. 

Set if "P" option was found. 

Set if "N" option was found. 

Set if "Z" option was found. 

Set if "F" option was found. 

Set if accessing a dictionary-file (DICT 
in input). 

Set if item found and retrieved. 



First exit only: base FID, modulo and separation 
of file being accessed. 



Base FID, modulo and separation of file being 
accessed. 



Points to non-blank following file-name if "F u 
option specified. 

Contains base-FID, modulo and separation of 
dictionary of file being accessed if "F" option 
is specified. 



Following specifications meaningful only if "F" option is not present 
BMSBEG S 



ABIT 

through 

ZBIT 

NOBIT 

D4 
D5 

SRO 



SIZE 
SR4 



Points one prior to area containing the item-id, 
which is terminated by a AM. 



B Set according to option list (see 
description above). 



3 



Set if numerical option found. 

Contains numerical option value(s). 

S Points one prior to count field of item 
on file. 

T Contains count field of item. 

S Points to last AM of item on file. 
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M0DEID3 T Contains tertiary mode-id from verb. 



ISBEG 



IS 

ISEND 
IR 



"C" Option in Verb 

Points one prior to 
beginning of copied 
item (including 
item-id, not 
including count 
field) 

Points to last AM 
of copied item. 

= IS 

Points to last AM 
of item on file. 



No "C" Option in Verb 



Points to end of string 



Points to AM following 
it em- id on file. 



Internal Usage 



RMODE 



T Contains mode-id of entry-point within TCL-II 

that WRAPUP processor exits to; must be maintained 
by lower-level processors. 



All elements as used by GETITM (q.v.) 



Subroutines Used 



RETIX, GBMS, GDLID, GETITM, GETOPT, GETFILE. 



Error Conditions 

The following conditions cause an exit to the WRAPUP processor with 
the error number indicated: 



200 
201 
202 
203 
204 
13 



File-name not specified 

File name illegal or incorrectly defined in the M/DICT 

Item not on file (will not abort processing). 

Item list missing. 

Error in format of option list. 

DL/ID item not found in dictionary-file. 
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5.2.4 USER EXITS FROM PROC 

A user- program can gain control during execution of a PROC, by using 
the Uxxxx command in the Proc , (where xxxx is the hex. mode-id of the 
user-program). The user-program can perform special processing, and 
then return control to the PROC processor. Necessarily, certain 
elements used by PROC must be maintained by the user-program. These 
elements are marked with an asterisk in the table below: 



Input Interface 



*RASE 


d' 


*MODULO 


T 


*SEPAR 


T 


*PQBEG 


S 


*PQEND 


S 


PQCUR 


S 


IR 


R 


*PBUFBEG 


S 



*ISBEG 
*STKBEG 

*SBIT 
IB 

*SC2 
IS 



1 



Contains FID, modulo and separation of 
M/DICT. 



Points one prior to the first PROC statement. 

Points to terminal AM of the PROC. 

Points to AM following the Uxxxx element. 

=PQCUR 

Points to buffer containing primary and secondary 
(if any) input buffers. Format: 

(SB) . . . primary input . . . (SM) (SB) . . . secondary 
input . . . (SM) 

Points to buffer containing primary output line. 

Points to buffer containing "stacked input" 
(secondary output) 

Set if ST ON command is in effect. 

Current input buffer pointer (may be within 
primary or secondary input buffers). 



Contains a blank. 
SBIT on 



Last byte moved into 
secondary output 
buffer . 



SBIT off 

Last byte moved into 
primary output buffer. 



UPD 



Last byte moved 
into primary 
output buffer. 



Last byte moved into 
secondary output 
buffer. 
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Output Interface 

IR R Points to AM preceding next PROC statement to 

be executed; may be altered to change location of 
continued PROC execution. 



IS 1 

UPD V 
IB J 



R May be altered as needed to alter data within 
R input and output buffers; but formats described 
R above must be maintained. 



Exit Convention 

The normal method of returning control to the PROC processor is to 
execute an external branch to 2, PROC-I. If it is necessary to abort 
PROC control and exit to WRAPUP, set PQFLG off, and execute an 
external branch to one of the WRAPUP entry points. 

Note that, when the PROC eventually transfers control to TCL, (via 
the P operator), certain elements are expected to be in an initial 
condition. Therefore, if the user-program uses these elements, they 
should be reset before returning to PROC, unless the elements are 
deliberately set up as a means of passing parameters to other processors, 
Specifically, the bits ABIT through ZBIT are expected to be zero by 
the TCL-II and ENGLISH Processors. It is best to avoid usage of 
these bits in PROC user-exits. The scan character registers SCO, 
SCI and SC2 must also contain an SB, a blank and a blank respectively. 
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5.3 WRAPUP PROCESSOR 

The WRAPUP Processor is entered under the following conditions: 

1) Termination of a TCL statement, when it is required to 
"wrap-up" processing and to return to the TCL level. 

2) Intermediate stage in processing a statement, when it is 
required to print messages from the ERRMSG file, or to 
perform disc updates, and then return to the calling 
processor . 

3) User-initiated termination of processing, via the 'END' 
command in DEBUG. 

The WRAPUP Processor has several entry points, depending on the type 
of action required; several of these entry points are provided to 
simplify the interface requirements when an error message is required 
(Note, for instance, that MD995 may be entered immediately after 
return from a call to, say, RETIX, if the item is not found on file, 
by setting up CI to the error message number). 

WRAPUP also performs the following functions before returning to 
TCL: 

1) Closes all open spool files, if LPBIT is set. 

2) Releases linked overflow space if OVRFLCTR 4 0. 



5.3.1 WRAPUP -I 
Functional Description 

1. Prints, or sets up for printing, messages that are stored 
in the file "ERRMSG" (must be catalogued in the process 
M/DICT. 

2. Performs disk updates as specified in the history 
string. 

3. Terminates processing of a TCL statement; re-initializes 
elements. 



Interface Requirements 



History String. The history string is from HSBEG through HSEND. If 
HSBEG=HSEND, the string is null; this is the initial condition on 
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entry to TCL. If HSBEG ^ HSEND, elements in the string are processed 
by WRAPUP. There are three types of elements; all other element types 
are ignored. 

1. Output message. 

(SM) (AM) Message-Id (AM) (Parameter (AM) ...) (SM) 

where Message-Id is the item-id of an item in the ERRMSG 
file. (Normally a decimal numeric). 

Parameters are character string that is to be passed to 
the message formatter (PRTERR, WRAPUP-III) . 

2. Disk Update/Delete string. 

(SM) DU (AM) base (VM) modulo (VM) separ (AM) item-id 
(AM) . . (item-body) (AM) (SM) 

(SM) DD (AM) base (VM) modulo (VM) separ (AM) item-id 
(AM) (SM) 

DU - Disk update; replaces entire item in the file 
specified by the decimal parameters base, modulo and separ. 

DD - Disk delete; deletes item from the file. 

3. End-of-string element 

(SM)Z 

Conventionally, a process wishing to add data to the history string 
begins at HSEND+1; when the entire additional element (s) has been 
added, the string is terminated with a (ZM) Z, and HSEND reset to the 
(SM). 

If WMODE is non-zero on any entry to WRAPUP, an indirect subroutine 
call (3SL*) via WMODE will be executed. This allows special processing 
to be done on every WRAPUP entry. 

WRAPUP may be called as if it is a subroutine by setting RMODE to the 
Mode-ID of the program to which WRAPUP returns control to; note how- 
ever, that the return-stack is alwavs set to a null or empty condition 
by WRAPUP. On the error-message setup entry points (MD99/MD993/ 
MD994/MD995) , if VOBIT is set and RMODE non-zero, the appropriate 
messages are stored in the history string, for printing on a final 
entry with RMODE zero. 

If OVRFLCTR is non-zero, it is assumed that it contains the starting 
FID of a linked set of overflow frames that is to be released to the 
system overflow pool. This tally is used, for instance, by the SORT 
processor to store the beginning FID of the sorted table; the overflow 
space used by the Sort is thus always released to the system even if 
the sort is aborted by the debug 'END' command. 
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Entry Points 



MD993 



MD994 



MD995 



MD99 



MD999 



TCL 



A message number is stored in CI; a numeric 
parameter is stored in C2. Sets up the message in 
the history string and exits to MD99. 

A message number is stored in CI; a character string 
parameter is stored for IS+1 through an AM or SM. 
Sets up the message and exits to MD99. 

As above, except that the parameter is from BMSBEG+1 
through an AM or SM. 

Message numbers (without any parameters) may be stored 
in REJCTR, REJO and REJ1 (no action is taken if zero.) 
After setting up the messages in the history string, 
exits to MD999 (If VOBIT set, skips history string 
processing in MD999). 

Processes all elements in the history string. 

Reinitializes process work spaces; exits to TCL 

if RMODE = 0; to calling program via RMODE if non-zero 

Kills history string; PROC control; exits to TCL 
(Entry point of "END" command for DEBUG). 



Subroutines Called 

PRTEER (WRAPUP-III) to print error messages. 

UPDITM (WRAPUP-II) to perform disk updates. 

ISINIT To re-initialize ISBEG/ISEND/OSBEG/OSEND. 

WSINIT To re-initialize process work areas. (BMS/CS/AF/IB/ 
OB/TS) 

CVTNIS To convert a decimal character string, from the IS, 
to binary. 

External Branches 

LOGOFF If USER = 

Error Messages 

"DISK UPDATE STRING ERROR"; self explanatory. 
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5.3.2 UPDITM (WRAPUP-m 

This subroutine; performs updates to the disc files in the system, 
is described in Section 5.4.3. 



It 



5.3.3 PRTEER (WRAPUP-III) 



Functional Description 

This subroutine is used primarily by the WRAPUP processor to retrieve 
and print error messages from the system file ERRMSG. A parameter 
string may be passed to the subroutine, which will format and insert 
the parameters as specified by the codes in the message item. System 
message item-ics are numeric; however, any item-id can be specified. 
See description of error messages for format of the codes. 



Input Interface 



TS 



Points one prior to the message item-id, which 
must be terminated by an AM. Parameters optionally 
follow, being delimited by AM's. The parameter 
string must terminate with a SM. 



Output Interface 



TS 



Points to AM following message-id, or AM or SM 
following last parameter output. 



Internal Usage 



EBASE 

EMOD 

ESEP 



} 



D Set up by PRTERR to ERRMSG file, if EEASE = 
T on entry; otherwise these elements are assumed 
T to be already initialized. 



All elements are used by WRTLIN and RETIX. 



Error Message Formats 



A (dec-number) 



Parameter insertion code; the next parameter 
from the history string, if any, is placed 
in the output buffer. If "dec-number" is 
specified, the parameter is left-justified in 
a blank field of the specified length. 
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R (dec-nunber) 

E (char-string) 

H (char-st:ring) 

L (dec-nunber) 

X (dec-nunber) 



As above; the parameter is right-justified in 
the blank field of the specified length. 

The message ID, surrounded by brackets, is 
placed in the OB, followed by the optional 
character string. 

The character string is placed in the OB. 

The output buffer is printed, and the specified 
number of line feeds are output (one if 
"dec-number" not specified). 

The OB is incremented by the number of spaces 
specified. If the end of the line is reached, 
the output buffer is printed and a new line is 
started . 

Adds system time in the format HH:MM:SS to 
the output buffer. 

Adds system date in the format DD MMM YYYY to 
the output buffer. 



On exit from this subroutine, the output buffer is printed and a new 
line started, unless the last character in the OB is an "+" , which 
causes printing of the buffer only. 



5.3.4 FUNCTIONAL ELEMENT USAGE BY ALL WRAPUP MODES 



Bits 
VOBIT 

SB60 
SB61 
RMBIT 



Description of Use 

Store/Print Flag; Store Messages ALL 
if set 



Scratch 
Scratch 
As used by RETIX 



Mode 



Wrapup-III 
Wrapup-III 
II, III 



Tallys 



) 



REJCTR\ Input error messages 

REJO 

REJ1 



CI 



C2 



Input error messages 



Input error messages 



KMD99) 



I (MD993/994/ 
995) 

I (MD993) 
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Bits Description of Use Mode 

C3 Scratch II 

D2 Scratch II 

D3 Scratch II 

SIZE Scratch II 

NEXT Scratch II 

RECORD, As used by disc-I/O subroutines II 
LINK(S) 

OVRFLW Scratch I, II 

D4 Scratch II 

T4 Scratch II 

BASE Various II 

MODULO I, II, III 

SEPAR 

EBASE Base-FID, modulo and separation 

EMOD of the ERRMSG file. Ill 

ESEP 

RMODE Return mode-ID I 

WMODE Special processing exit mode-ID I 
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Registers 



HSBEG 
HSEND 

BMSBEG 
BMSEND 

CSBEG 
CSEND 

ISBEG 
ISEND 

OSBEG 
OSEND 

IBBEG 
IBEND 

OBBEG 
OBEND 

AFBEG 
AFEND 

UPD 

IR 

TS 

AF 

Return 
Stack 



Beginning and end of history 
string 



J 



Reinitialized on exit from MD999 



Scratch 
Scratch 
Scratch 

Scratch 

Reset to null condition on exit 
from MD999 



1, II 

I, II, III 

III 
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5.4 DISC FILE I/O 
5.4.1 RETIX AND RETI 

Functional Description 

Retrieves an item stored in a file. The item-id is explicitly 
specified to this routine, as are the file parameters base, modulo and 
separation. The subroutine performs a "hashing" algorithm (see HASH 
documentation) to determine the group within which the item may be 
present, and then searches sequentially down the data in the group for 
a matching item- id. If found, the subroutine returns pointers to the 
beginning and end of the item, and the item size (from the item count- 
field). 



The item-id is specified in a buffer defined by t 
if the entry RETIX is used, the item-id must be t 
if RETI is used, the register BMS must point to t 



he register BMSBEG; 
erminated by an AM; 
he last byte of the 



item- id. An AM will be appended to the it em- id by RETI. 



Input Interface 



BMSBEG 


S 


BMS 


R 


BASE 


D 


MODULO 


T 



Points one prior to the item-id required. 

RETIX: not an input interface requirement. 
RETI: points to the last byte of the item-id, 

Contains the base FID of the. file. 

Contains the modulo (number of groups) of the 
file. 



SEPAR 



Contains the separation (number of frames per 
group) of the file. 



Internal Usage 



XMODE 



Used to exit to subroutine IROVF if a group 
format error occurs. 



Output Interface 

BMS R 
BMS END S 



} 



Points to last character of item- id. 



RECORD Contains the beginning FID of the group to which 

the item-id hashes. 
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NNCF 
FRMN 
FRMP 
NPCF 

XMODE 



RMBIT 

SIZE 

R14 

IR 



] 



Contain the link fields of the frame above 



SR4 



Zero 

Item Found 

Set. 

Item count-field. 

One prior to item 
count field. 

Points to first 
AM of item 



Points to last 
AM of item 



Item Not Found 



Zero . 

Zero. 

Points to last AM of last 
item in group. 

Points to AM indicating 
end of group data 
(=R14 +1). 

=R14 



Subroutine Usage 

RDREC, Requires one additional level of subroutine 
HASH, linkage; three if a group format error 
IROVF occurs. 



Error Conditions 



If the data in the group is bad - premature end of linked frames, or 
non-hexadecimal character encountered in the count field-the 
message : 



****GROUP FORMAT ERROR AT: 



. xxxxxx 



is returned (xxxxxx is six character hexadecimal FID indicating where 
the error was found), and the routine returns with an "item not 
found" condition. Data is not destroyed, and the group format error 
will remain. 
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5.4.2 GETITM 
Functional Description 

Sequentially retrieves all items in a file. This routine is called 
repetitively to obtain items from a file one at a time until all items 
have been retrieved. The order in which the items are returned is the 
same as the pseudo-random storage sequence. 

If the items retrieved are to be updated by the calling routine (using 
The routine UPDITM) , this should be flagged to GETITM, which will then 
perform a two-stage retrieval process by first storing all item-id's 
(per group) in a table, then will use this table to actually retrieve 
the items on each call. This is necessary because, if the calling 
routine updates an item, the data within this group shifts around; 
GETITM cannot simply maintain a pointer to next item in the group, as 
it does if the "update" option is not flagged. 

An initial entry condition has also to be flagged to GETITM; it then 
sets up and maintains certain pointers which should not be altered by 
the calling routines until all the items in the file have been 
retrieved. 

Note the functional equivalence of the output interface elements with 
those of RETIX. 



Input Interface 



DAF7 



Initial entry flag; must be zeroed on first 
call to GETITM. 



DAF1 

DBASE 

DMOD 

DSEP 



} 



If set, "update" option is in effect. 

Contains base FID, modulo and separation of 
the file 



BMSBEG 



Points one prior to an area where the item-id 
of items retrieved may be copied. Must be at 
least 50 bytes in length. 



Internal Usage 



RECORD 



NNCF, 

FRMN, 

FRMD, 

NPCF, 

XMODE, 

EOFBIT 



> Used internally. 



J 
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These elements should not be altered by any other routine while 
GETITM is used. 



DAF7 


B 


DAF1 


B 


DBASE 


D 


DMOD 


T 


DSEP 


T 


SBASE 


D 


SMOD 


T 


SSEP 


T 


NXTITM 


S 



} 

} 
] 



OVRFLCTR D 



See above 

Current group beginning FID. 

Number of groups left to be processed. 

Separation parameter of file (unchanged). 

Saved values of original base FID, modulo 
and separation. 

If DAF1 set: Points one before next item- id 
in prestcred table. 

If DAF1 zero: Points to last AM of item 
previously returned. 

Overflow space table starting FID; used if 
DAF1 set. 



Output Interface 



RMBIT 


B 


SIZE 


T 


R14 


R 


SRO 


S 


IR 


R 


SR4 


S 


XMODE 


T 



Set if item found; zeroed if all items exhausted 

Contains item count-field. 

Points one prior to count-field. 

=R14 

Points to first AM of item. 

Points to last AM of item. 

Zero 



Subroutines Used 

RDREC, GNSEQI, GNTBLI (last two local); requires one additional level 
of subroutine linkage. 



Error Condition s 

As for RETIX (q.v.); except that the routine will continue retrieving 
items, if any more exist, after the error condition is reported. 
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5.4.3 UPDITM 

Functional Description 

This routine performs updates to a disc file defined by its base FID, 
modulo and separation. If the item is to be deleted, the routine will 
compress the remainder of the data in the group in which the item 
resided; if the item is to be added, it will be added at: the end of the 
current data in the group; if the item is to be replaced, functionally 
a deletion and then an addition takes place. UPDITM does not perform 
a merge into an already existent item. 

If the change of data in the group reaches an end of the linked frames, 
UPDITM will obtain another frame from the overflow space pool and link 
it to the previous linked set; as many frames as required will be added, 
If the deletion or replacement of an item causes an empty frame at the 
end of the linked frame set, and that frame is not in the "primary" 
area of the group, it will bo released to the overflow space 
pool . 

Once this routine is entered, the processing cannot be interrupted 
until completed. 



Input Interface 



BMSBEG 



Points one prior to the item- id to be updated; 
the item-id must be terminated by an AM. 



TS 



Points one prior to the item body; the data must 
be terminated by a SM. This is not: an input 
interface element for item-deletes. 



CH8 



BASE 


D 


MODULO 


T 


SEPAR 


T 



} 



Contains the character 'U' for an item-addition 
or replacement; 'D' for an item-delete. 

Contains the base FID, modulo and separation of 
the file being updated. 



Internal Usage 



RMBIT B 
INHIBITSV1 B 
CTRO T 
CTR1 T 



Various 

Saves condition of INHIBIT 
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D2 D 

D3 D 

XMODE T 

Output Interface 

TS R 

IR R 

UPD R 



Points to SM terminating item-body for item-add 
or replace. 

Points to AM terminating group data 

Points to last byte of last frame in group 



CS R Points one prior to item-id on item-add or 

replace 

BMS R Points to AM following item-id 

SIZE T Contains new item size on add or replace 

Subroutine Usage 

RETIX, RDREC, RDLINK, WTLINK, IROVF, BMSOVF, ATTOVF, RELOVF. Uses two 
additional levels of subroutine linkage. 

A subroutine called LOCK is used by UPDITM. UPDITM is the 
subroutine called to most file updates, and locking this 
mode prevents simultaneous updates to files. This will 
eliminate the generation by UPDITM of group format errors, 
which can result if two processes attempt to update the 
same file simultaneously. 

Note that no retrieval lock feature is used. This means 
that a 'TEMPORARY' group format error can appear on ac- 
cesses to a file which is being updated. On a subsequent 
access, this group format error will not appear. 

DATA/BASIC, which uses its own code for some updates, also 
uses LOCK. 
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Error Cond itions 

1. If the group data is bad, premature end of linked data set, 
or non-hexadecimal character found in a count field, the 
group data is terminated at the last good item, and the 
message: 

*** GROUP FORMAT ERROR AT: . xxxxxx 

is returned (xxxxxx is a six digit hexadecimal FFD indicating 
the location of the error), before the process continues. 

2. If the file being updated is the^M/DICT (as indicated by 
BASE being equal to MBASE) , and the system privilege level 
one flag is not set, the routine aborts with the message: 

YOUR SYSTEM PRIVILEGE LEVEL IS NOT SUFFICIENT FOR THIS 
STATEMENT 

The update is not performed. 

3. If the item-id is greater than 50 characters, the update is 
not performed; no indication is returned. 

4. If the item exceeds the maximum size (32767 bytes, X'7FFF'), 
the item is truncated to 32767 bytes; no indication is 
returned. 
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5.4.4 GBMS 



Functional Description 

Sets up the base FID, modulo and separation parameters of a file from 
the file definition item that has been retrieved. Typically this rou- 
tine will be called after a call to RETIX which retrieves the file- 
name from the master dictionary. 

The routine handles both " D ' and 'Q' code items; a 'D' code item is a 
direct file-pointer, and has the base FID, modulo and separation of the 
file in attributes 2, 3 and A. A ' Q T code item is a synonym pointer to 
a file defined in any account in the SYSTEM dictionary. This subroutine 
also performs the file access-protection checks. It is assumed that 
register LOCKSR points to the user's lock codes (in his logon entry in 
the SYSTEM dictionary; if the file has a lock code, a matching lock 
code is required for GBMS to return successfully. A non-match causes 
an exit to WRAPUP with message 210. 



Input Interface 



DAF1 



If zero, uses retrieval lock-codes in LOGON 

entry for lock-code comparison; if set uses update 

lock-codes. 



IR 



Points to, or one prior, 'D' or 'Q' code in 
attribute one of file-definition item. 



SR4 S Points to AM at end of file-definition item. 

LOCKSR S Points one prior to the user's lock-code field in 
his SYSTEM dictionary entry. 



Output Interface 



RMBIT 



BASE 


D 


MODULO 


T 


SEPAR 


T 



IR 



} 



Set if base, modulo, separation successfully 
converted; zero if error in format, ' Q' item not 
found, etc. 

Contain base FID, modulo and separation of the 
file (if RMBIT set) 

Points to AM following attribute four of the 
file-definition item. 



Subroutine Usage 

CVDR15; recursive call to GBMS and RETIX if 'Q' code item; two further 
levels of subroutine linkage if 'D' Code; three if 'Q' code item. 
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Errors 



On failing the lock code comparison test, an exit is taken to WRAPUP 
with message 210 (FILE IS ACCESS PROTECTED); to ensure termination of 
the curent process, RMODE is zeroed, PQFLG is set off and the history 
string set null before the exit. 
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5.4.5 GDLID 

Functional Description 

This subroutine gets the base, modulo and separation parameters from 
the DL/ID item in a dictionary. Typically this routine is called 
immediately after the dictionary base, modulo and separation have 
been obtained by GBMS. 

GDLID retrieves the DL/ID item from the dictionary, and then enters 
GBMS to pick up its base modulo and separation. 



Input Interface 

BASE D 

MODULO T 

SEPAR T 



Output Interface 



} 



Contains b, m, s of a file, 
containing the DL/ID item. 



RMBIT B Set if DL/ID found; zero otherwise. 



BASE D 
MODULO T 
SEPAR T 



} 



Contains base FID, modulo and separation of 
the data-file (if RMBIT is set). 



Other elements as from GBMS and RETIX except that BMS/BMSBEG/BMSEND 
do not contain the DL/ID item-id. 
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5.5 TERMINAL I/O 



5.5.1 GETIB AND GETIBX 



Functional Description 

GETIB and GETIBX are the standard terminal input routines. Register 
IBBEG points to a buffer area where the routine will input the data. 
Input continues to this area until either a carriage return or line 
feed is encountered, or until a number of characters equal to the 
count stored in IBSIZE have been input. The carriage return or line 
feed terminating the input line is overwritten with a segment mark 
(SM) and register IBEND points to this character on return. If the 
input is terminated because the maximum number of characters have 
been input, a SM will be added at the end of the line. This sub- 
routine calls the subroutine GETBUF to read input data from the ter- 
minal.' On return, GETIB then determines if the last character was 
a carriage return or a line feed which terminates the line, and causes 
a CR/LF echo to the terminal; if not, it either accepts or deletes the 
control character, depending upon the setting of the bit CCDEL, and 
calls GETBUF again. 

The entry GETIB also provides the facility for taking the input from a 
stack instead of directly from the terminal. The bit STKFLG, if set, 
indicates that stacked input is present and register STKINP points to 
the area where the stacked input is stored. Input is copied from the 
stack area to the buffer, through the delimiter AM. The delimiter SM 
is used to signal the end of stack input. When this is encountered, 
STKFLG is turned off to indicate no more stacked input, and the routine 
then goes to the terminal for further input. The entry GETIBX does not 
test for stacked input. The stacked input feature is used primarily 
by the processor PROC to store input lines, which are returned to 
requesting processors as if they originated the terminal. 

The stacked input routine in GETIB tests the last character 
of a stacked line for a "<"; if found, that character is 
overwritten with an SM. This allows the user to pass a 
line-continuation character to processors which recognize it 



Input Interface 

IBBEG S 



Points one prior to buffer area where input is to 
be stored. Size of the buffer must be two 
characters greater than the value in IBSIZE. 



IBSIZE 



Contains maximum number of input characters to be 
accepted. 



STKFLG 



If set, indicates that "stacked" input may exist; 
if it does, terminal input will not be requested 
until the stack is exhausted. 



STKINP 



Points to next "stacked" input line; lines are 
delimited by AM's; a SM indicates end of stack. 



PRMPC 



Terminal "prompt" character; output before data 
is requested from the terminal. 
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LFDLY 



CCDEL 



Low-order by tie contains the number of "fill" 
characters (nulls) to be issued after a carriage- 
return/ line feed is output to the terminal. 

If set, control characters are deleted from 
terminal input. 



Output Interfa c e 
IB R 
IBEND S 

STKFLG B 
STKINP S 



Set to IBBEG. 

Points to SM one past last character input 
(Overwrites CR or LF character). 

Zeroed if end of stacked input reached. 

Points to next line of stacked input. 



Subroutines U sage 

GETBUF, PCRLF (both local); uses one additional level of subroutine 
linkage. 



Error Conditions and Abnormal Exits 

If the "stacked" input line exceeds IBSIZE, the line is truncated at 
IBSIZE; the remainder of the line is lost. 
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5.5.2 GliTBUF 



Functional Description 



Inputs data from the terminal, and performs line editing functions 
Returns control when a non-editing control character is input, or 
when the number of characters specified in TO has been input. 

Line editing features: 



Character Input 
Control-H 

Control-X 

Control-R 
Rubout 



Control-shif t-K 
Control-shif t-L 
Control-shif t-M 
Control-shif t-N 
Control-shif t-0 



Action 

Logically backspaces buffer pointer; echoes 
character defined at BSPCH. 

Logically deletes (or cancels) entire input 
buffer; echoes a carriage return, line feed, 
re-issues prompt character. 

Re-types input line. 

Ignored; the character is echoed, but is not 
stored in the buffer. 



These characters are converted to the internal 
delimiters SB, SVM, VM, AM, and SM respectively; 
they echo as the characters [,/,], , 



Note: The high-order bit of all characters input is zeroed. 



Input Interface 

R14 R 

TO T 

PRMPC C 

BSPCH C 



Points one prior to input buffer area. 

Maximum number of characters to be accepted. 

Character output as a "prompt" when input is 
first requested. 

Character echoed when a control-H is input. 



Output Interface 



R15 



Points to control character causing return to 
caller. 
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5.5 .3 WRTUN 1 AND WRITuP 

Functio nal Description 

Standard terminal output routines. Outputs data to the terminal or 
line-printer; controls pagination and page-heading routines. Entry 
WRTLIN adds 3 car riage-return/line- feed to the data; WRITOB does not. 
The data to .^e output starts at OBBEG, and continues through to the 
location addressed by OB. 

The data is output to the terminal if LP BIT is off; it is stored in 
the printer spooling area if it is set. Pagination and page-heading 
are controlled by PAGINATE, if set. In this case, when the number of 
lines output in the current page (in LINCTR) exceeds the page size 
(in PAGSIZE) , the following actions take place: 1) The number of 
lines specified in PAG SKIP are skipped; 2) the page number in PAGNUM 
is incremented, and 3) A new page heading is printed (see Section 
5.5.5). A zero value in PACSTZF: suppresses pagination 
regardless o:: the setting of PAGINATE. 

The "delay" character that is output at the end of a line 
is X'OO' / 

Editing Features 

The internal delimiters SM, AM, VM, SVM, SB, are converted to the 
characters _. ,],/,[, respectively, if SMCONV is off; the output 
buffer area :.s blanked if NOBLNK is off. Trailing blanks are always 
deleted by the entry WRTLIN. 

Carriage returns and line-feeds should not occur in the buffer if 
pagination is to be used. 



Input Interface 

OBBEG S Points one prior to the output data buffer. 

OB R Points to the last character in the buffer; the 
buffer must extend two characters beyond this 
location. 

If set, routes output to the spooler. 

If set, suppresses all output to the terminal. 

If set, suppresses conversion of internal delimiters 

If set, suppresses blanking of output buffer. 

If set, pagination and page-headings are invoked. 

Location of page-heading message. 
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LPBIT 


B 


LISTFLAG 


B 


SMCONV 


B 


NOBLNK 


B 


PAGINATE 


B 


PAGHEAD 


S 



LINCTR 


T 


PAGSIZE 


T 


PAGSKIP 


T 



Number of lines printed in current page. 

Number of printable lines per page. 

Number of lines to be skipped at bottom of page. 

(Above four elements used only if PAGINATE IS 
set. ) 

LINESOUT T Incremented on every entry. 

LEDLY T Lower byte contains number of "fill" characters to 
be output after CR/LF. 



Internal Usage 

If LPBIT is set, the spooler routine PPUT will be called, and elements 

R8, T4, T5, DO, Dl, RECORD D2 , R14, R15, OVRFLW, SYSRO may be destroyed 



Output Interface 

OB R Reset to OBBEG 

LINCTR, PAGNUM, LINESOUT: reset appropriately. 

Subroutines Used 

PPUT (printer spooler); PCRLF: NPAGE. Requires two additional levels 
of subroutine linkage. 

Errors and Abnormal Exits 



None 



5.5.4 PCRLF 



This subroutine may be used to output a CR/LF, with appropriate delays 
if necessary. Its use is not compatible with pagination. 



Input Interface 

LFDLY See above. 
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5.5.5 PRNTHDR AND NEWT AGE 

Page-heading control routine; PRNTHDR is used to initialize the 
pagination control elements; NEWPAGE is used to cause a skip to a new 
page, and to output a new page heading. 

PRNTHDR sets the page number to one, the line counter to zero; sets 
the pagination flag, and outputs the first page heading. The page 
heading must be stored in a buffer defined by P AG HEAD ; the header 
message is a string of data terminated by an SM; other system 
delimiters are used as below: 



Delimiter 

SM,X'FF' 

AM,X'FE' 

VM,X'FD' 

SVM,X'FC 



Action 

Terminates header line with a CR/LF. 

The current page-number is inserted in the heading 

Prints header line, starts a new header line. 

The current time and date are inserted in the 
heading. 



Carriage-returns, line feeds and form-feeds should not be included in 
the header message. 



Input Interface 

LPBIT B 
PAGHEAD S 

LINCTR T 
PAGNUM T 
LFDLY T 



OBBEG 



If set, output is routed to the print spooler. 

Points one prior to the beginning of the header 
message, which must be terminated by an SM. 

Line number in current page. 

Current page number. 

Lower byte contains number of "fill" characters 
to be output to terminal after a CR/LF. Upper 
byte: if non-zero, a form-feed (X'OC) character 
will be output before the start of a new page, and 
that number of "fill" characters will be output. 

Points one prior to a buffer when the translated 
header message is built; this buffer area must be 
16 bytes greater than the longest header linp. 
(Not total header message size.) 



Internal Usage 



OB 



Used to build the header message and to output it 
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Output Interface 

LINCTR, PACNUM Reset appropriately. 



Subroutine Usage' 

WRITOB, TIMDATE Uses two additional levels of subroutine 

linkage (three if time and date are inserted 
in header) 



Errors 

None 
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5.5.6 PRINT AND CRLFPRINT 

Functional Description 

Sends a message to the terminal from textual data in the calling 
program; used primarily for printing error messages. These subroutines 
are not compatible with output conventions to the lineprinter, and 
with the pagination routines. The message is a string of characters 
assembled immediately following the subroutine call in the calling 
program. The message must be terminated by one of the four delimiters 
SM, AM, VM, or SVM. Control is returned to the instruction at the 
location immediately following the terminal delimiter. 

Delimiter Action 



SM,X'FF'l End of message; print carriage-return/line-feed 
AM,X'FE' I before return. 



VM,X'FD' Print carriage-return/line-feed, continue. 
SVM^'FC' End of message, no carriage return/line-feed 

Input Interface 

Message follows the call to this routine. 

LFDLY T Low-order byte contains number of "fill" 
characters after CR/LF is output. 

Subroutine Usage 

PCRLF; one additional level of subroutine linkage. 

Errors 
None 
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5.6 VIRTUAL MEMORY I/O 

5.6.1 RDRFX 

Functional Description 

RDREC is used to set up the registers IR, IRBEG, and IREND to the 
beginning and ending of the frame as defined by the tally RECORD. The 
subroutine assumes the frame has the linked format and therefore, IR 
and IRBEG are set pointing to the eleventh byte of the frame, that is, 
one prior to the first data byte of the frame. IREND is set up 
pointing to the last or 511th byte of the frame. Additionally the 
subroutine RD^INK is entered to set up R15 pointing to the link portion 
of the frame, and to set up the link elements NNCF, NPCF, FRMN , FRMP. 



Input Interface 



RECORD 



D Contains FID required. 



Output Interface 



IR 


R 


IRBEG 


S 


IREND 


S 


R15 


R 


NNCF 


H 


FRMN 


D 


FRMP 


D 


NPCF 


H 



Points one prior to first data byte of frame 

As above. 

Points to last data byte of frame. 

Points to zero-th byte of frame. 

Contains "nncf" field of frame. 

Contains forward link FID of frame. 

Contains backward link FID of frame. 

Contains "npcf" field of frame. 



Subroutines Usage and Error Condition 



None 
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5.6.2 RDLINK AND WTLIVK 



Functional Description 



These routines read or write the link fields from or to a frame, to 
or from the tallies NNCF, FRMN, FRMP and NPCF. The FID of the frame 
is specified in RECORD. 



Input/Output Interface 

RECORD D FID of frame whose links are to be written or 
read. 

NNCF H Number of next contiguous frames. 

FRMN D Next or forward link FID. 

FRMP D Previous or backward link FID. 

NPCF H Number of previous contiguous frames. 

R15 R Points to zero-th byte of frame. 

Subroutines Used and Error Conditions 
None 
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5.6.3 LINK 

Functional Description 

Sets up the link fields of a group of unlinked contiguous frames. Up 
to 127 frames can be so linked. In each frame of the linked set, this 
subroutine sets up the number of next contiguous frames field, the 
next or forward link field, the previous or backward link field, and 
the number of previous contiguous frames field. 

Input Interface 

RECORD D Contains first FID of the group to be linked. 

NNCF H Contains one less than the number of frames in 
the group (NNCF <127). 



Output Interface 

R14 R Points one prior to the first data byte of first 
frame of linked set. 

R15 R Points to the last data byte of the last frame 
of linked set. 



Subroutines Called and Error Conditions 
None 
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5 . 7 OVERFLOW SPACE MANAGEMENT 

5.7.1 GETOVF AND GETBLK 

Functional Description 

These routines obtain overflow frames from the overflow space pool 
maintained by the system. GETOVF is used to obtain a single frame; 
GETBLK is used to obtain a block of contiguous space (used mainly 
by the CREATEFILE processor). Note that the link fields of the 
frame (s) obtained by a call to GETBLK are not reset or initialized 
in any way; this is a function of the calling routine (also see 
Sections 5.7.3 and 5.7.41; GETOVF zeroes all the link 
fields of t^ie frame it returns. 



Input Interface 



DO 



(Accumulator) contains number of frames needed 
(block size), for GETBLK only. 



Output Interface 



OVRFLW 



Contains FID of the frame obtained (GETOVF) or 
first FID of the block obtained (GETBLK). 



Subroutines Used 



SYSGET 



One additional level of subroutine linkage 
required . 



Error Conditions 

Zero returned in OVRFLW if system overflow space is exhausted, 
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5.7.2 RkhOVF', RHLCIT\ T AND RFLfiLK 

Functional De-script ion 

These routines arc used to release frame (s) to the over!" low space 
pool. RELOVF is used to release a single frame; RELCHN is used to 
release a chain of linked frames (which may or may not he contiguous) 
RELBLK is used to release a block o( continguous frames. A call to 
RELCHN specifies the first FID ol a linked set of frames; the routine 
will release all frames in the chain until a zero forward link is 
encountered . 

Input interface 

OVRFEW D Contains the FID of the frame to be released 
(RELOVL), or the first FID of the chain or 
block to be released. 

DO D (Accumulator) contains the number of frames in 

the block to be released (block-size), for 
RELBLK only. 

Output Interface 
None 

Subroutines Called 



SYSREL (RELBLK only); one additional level of subroutine linkage 
required . 



Errors 
None 
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5.7.3 ATTOVF 

Functional Description 

ATTOVF is used to obtain a frame from the overflow space pool and to 
link it to the frame specified in RECORD. The forward link field of 
the frame specified in RECORD is set to point to the overflow frame 
obtained; the backward link field of the overflow frame is set to 
point to that in RECORD, and the other link fields of this frame are 
zeroed . 

Input Interface 

RECORD D Contains FID of the frame to which an overflow 
frame is to be linked. 

Output Interface 

OVRFLW D Contains FID of the frame obtained from 
overflow space. 

Subroutines Used 

GETOVF Requires two additional levels of subroutine 

linkage. 

Error Conditions 

Zero returned in OVRFLW if system overflow space is exhausted. 
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5. 7.4 NHSTI R AM) M!XTO\T 



Func t iona 1 Dt'sr r ipL i on 



Those routines obtain the foward linked frame of the franco to which the 
register IR currently points; if the forward link is zero, an available 
frame from the system overflow spaee pool is obtained and linked 
appropriately (see Section S . ' 7 . 7, ) . In addition, the IR registe 
triad is then set up before return, using the subroutine RDREC . 

NEXTOVK may he used in a special way to aut oma t i en 1 ] v handle end-of- 
1 inked- frame conditions, on register six (iK), on sing], or multiple 
byte move on scan instructions. Set tally XMODh to ihe mode-id of cue 
subroutine NF.Xl'OVF before the move or scan instruction is executed; if 
the instruction causes register IR to reach an end-o t - 1 i nked-f rame 
condition (forward link zero), the system will generate a subroutine 
call to NFXTOVF, which in tern obtains and links up an available frame:, 
and then resumes execution of the interrupted instruction. Note that 
the instruction "increment register by tally" cannot he so handled. 
Instructions compatible with. NEXTOVF are: Mi ID, Mil and MCI. 



Input Interface 

IR R On last data byte of frame. 

Out put Interti ee 

Points to i irst data byte of forward linked frame 



in 


R 


IRbEG 


S. 


I REND 


s 


RECORD 


D 


FRMN , 




FRMP, 




NPCF, R15 





3 



Points to last data byte of frame. 
Contains FID of frame to which IR points 
As set up by RDKEC. 



Subroutine Used 



RDREC; ATTOVF; uses two additional levels of subroutine linkage 

Error Conditions 
None 
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5.8 WORK SPACE INITIALIZATION 
5.8.1 WSINIT 

Functional Description 

Initializes the process work-space pointer dyads: BMSBEG, BMSEND; 
CSBEG, CSEND; AFBEG, AFEND; IBBEG, IBEND; OBBEG, OBEND; PBUFEND, 
PBUFBEG. All work-spaces except the last are contained on one frame; 
PBUFBEG and PBUFEND define a 4-frame linked work-space. 

Work-Space Size (Bytes) 

BMSBEG- BMSEND 50 

AFBEG-AFEND 50 

CSBEG-CSEND 100 

IBBEG-IBEND Contents of IBSIZE; max. 140 

OBBEG-OBEND Contents of OBSIZE; max. 140 

PBUFBEG-PBUFEND 2000 (4 linked frames) 

Input Interface 

VOBIT B Set if linking of PBUF-space required. 

IBSIZE T Size of IB buffer. 

OBSIZE T Size of OB buffer. 

Output Interface 

Storage registers set up as in above table; associated address 
registers BMS, AF , CS, IB, OB, set at beginnings of respective buffers 

Subroutine Usage 

LINK; one additional level of subroutine linkage is used. 
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S . 8 . 2 TS ' \ I T 

This routine sets up the pointers to a one-frame scratch space; 

the pointers set up are TSBEG, TSEND, by TSINT. The associated 

address register, TS , is set at the beginning of the buffer. 



5,8.3 I S I N I T 

Functional Description 

This routine initializes all the system work-space pointers. The 
link-fields of linked work-spaces (IS, OS, HS , PBUF) are not 
initialized unless VOBIT is set. As the IS, OS and HS may have addi- 
tional work-space assigned to them, calling ISINIT with VOBIT set 
will cause a loss of the additional work-space and a loss of system 
overflow space. 

Output Interface 

As for TSIN::T and WSINIT above; 

ISBEG, IS Point to PCB + 16 

ISEND = ISBEG + 3000 

OSBEG, OS Point to PCB + 22 

OSEND =0SBEG + 3000 

HSBEG Points to PCB + 10 

HSEND =HSBEG 
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5.9 TAPE CONTROL ROUTINES 

These routines provide for passing control commands to the magnetic 
tape unit. As in all tape commands, it is assumed that the tape 
unit is "attached" to the process executing these routines; this is 
flagged by che bit ATTACH being set. Conventionally, ATTACH should 
only be set by executing the verb T-ATT from the TCL level. 



5.9.1 INIT AND TPSTAT 

All tape I/O routines use the INIT and TPSTAT subroutines. INIT 
outputs a function-code of "1" to the tape controller, thereby setting 
it to an initial condition, and then falls through into the tape 
status from the controller. It will return only if the tape is in a 
"ready" state. If the tape is rewinding, the subroutine will wait 
till it finishes. Otherwise, the status is tested up to one hundred 
times; if the tape unit is still not ready, an exit is taken to MD99 
with error message 95 (NOT ON-LINE). 



Input Interface 
None 

Internal Usage 

T6 T Used as a delay counter 

Output Interface 

REJCTR T Zero 
Tape status bits are as below: 

EOFBIT B Set if an end-of-file mark is reached. 

EOTBIT B Set if the tape is at load point, or at the 
end-of-tape marker. 

PARITY B Set if a parity error is detected. 

NORING B Set, on a write operation, if the write, ring 
in the tape is not present. 

5.9.2 WEOF 

Writes and end-of-file mark on the tape. 
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5.9.3 BCKSF' 

Back spaces the tape by one record 

5.9.4 REWIND 
Rewinds the tape unit. 

5.9.5 FRWSP 



Forward spaces the tape by one record; this subroutine destroys 
location X'IFF' in the PCB. 
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5.10 TAP 3 I/O ROUTINES 

5.10.1 TPREAD AND TPWRITE 

TPREAD reads one record from the tape to a buffer defined by R15; 
the read stops either when the inter-record gap in the tape is 
detected, or at the end of the frame to which R15 points. 

TPWRITE writes one record from the buffer defined by R15 to the 
magnetic tape; the write will always continue until the end of the 
frame to which R15 points. 

A maximum of 512 bytes may be transferred by these routines. 

Input Interface 

ATTACH B Must be set, indicating tape unit is attached. 
R15 R Points to first byte of buffer area. 

Output Interface 

R15 R Points to last byte read (TPREAD). In the case 
of a read where the tape record is shorter than 
the buffer, R15 points one byte past the last 
data byte. 

Tape status bits set appropriately. 
Subroutines Used 



INIT, TPSTAT (local); uses two additional levels of subroutines 
linkage. 



Error Condit ions 

Read parity error: the read is repeated ten times; if the parity 
error persists, an exit is taken to MD99 with error number 98. 

Write parity error: the write is re-tried once; then the sequence - 
backspace / write end-of-file mark / backspace and repeat write - is 
tried nine times; if the parity error persists, an exit is taken to 
MD99 with error number 98. 

Also see INIT and TPSTAT. 
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5.10.2 ITPIB, TPIiJ, OBTP, AM) FOBTP 

The routines ITPIB, TP1B, OBTP and FOBTP aLlow reading and writing 
variable length records, blocked in fixed-length 500-byte records. 
These routines use the first two frames of the OS workspace to block 
and. de-block; the unblocked data is passed to the write routine (OBTP) 
in the OB; it is passed from the read routine (IBTP) in the IB. 

Reading a blocked tape: An initial call must be made to ITPIB to 
initialize the de-blocking pointers; subsequently, each call to IT IB 
will return one tape record. 

Writing a blocked tape: The data to be written to the tape is placed 
in the OB, and OBTP is called to store it in the bloc King area. When 
the output is to be terminated, one call to FOBTP must be made to 
clear the blocking area and force the data to be written to the tape. 

These routines use the delimiter SB (X'FB') as the block delimiter; 
therefore, SB's in the data to be written to tape are converted to 
blanks before being output. 

Note interface equivalence of these routines with the corresponding 
terminal I/O routine. 



Input Interface 

ITPIB : OSBFG S Points are prior to deblocking buffer. 

TPIB : IBBEG S Points one prior to buffer area where 

deblocked data is to be copied. 

OBTP : OBBEG S Points one prior to buffer area containing 

data to be blocked. 

OB R Points to last byte of data. 
FOBTP : NONE 



Internal Usage (A ll Routines) 

OSBEG S Points to a linked work-space used by the 

blocking and de-blocking routines. Must be 
at least 3 frames. 

OS R Current pointer in blocked data area; must be 

maintained . 

SC2 C Scratch (OBTP, FOBTP only). 
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Output Interface 
ITPIB : OS R 

TPIR : IB R 
IBEND S 
OBTP : OB R 
FOBTP : NONE 



Points to OSBEG; first two tape records have 
been read into the OS frames. 

Points to IBBEG, one prior to de-blocked data 

Points to a SM following last byte of data. 

Reset to OBBEG 



Subroutines Called 



TPREAD or TPWRITE; three additional levels of subroutine linkage, 



Errors 



See precediig documentation. 



5. 10. 3 SHGMNT ( 3 ,TAPL : JO - 1 1 ) 



This subroutine is used by the File-Restore, Sel-Restore, and Ace- 
Restore processors to de-block data from a File-Save tape. The 
built-up "segment" (data between segment marks on the tape) is stored 
in the LS. 



Input Interface 

SI S 



Points to location, within IB, of the last: SM 
found. On initial entry, this is setup by the 
calling mode; it must be maintained between 
calls to SEGMNT. 



Output Interface 

ISBEG S Buffer where the segment has been copied 
IS R =ISBEG 

XMODE T Zero 

Subroutines Used 



TP1B 
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1A5 (Bit 0) 


B 


1A6 


T 


1A8 


L 


1D6 


L 



5.11 LABFLFD TAPF 1/0 ROUTlNliS 

Label format : 

(SM)L. . .label data...(VM) time date (AM) reel // (AM) (SM) 

The label is stored in the quadrenary control block (PCB + 3); 
displacements to various elements are as below: 

Byte Displacement Type Description 

"unlabeled tapes in use" flag 

Reel number 

Label save buffer (46 bytes) 

Label write/read buffer (30 bytes) 

Since the Lrpe-I/0 routines are non-reentrant, internal storage is 
utilized when an EOT condition is handled by the tape write or read 
subrout ines . 

These routines save R13, R14, R15 in internal save areas (defined in 
TAPEI0-1I), and set up R13 to displacement X'1A6' in the quadrenary 
control block in order to address elements in that block. 

R13, R14 and R15 are restored on exit. 



5.11.1 RDFARFI, ( 2 ,TAPlil 0- I I) 

May be called once by any program to read the label from reel //I; if 
the tape is labeled, the label is stored in the save area; if not, the 
"unlabeled tapes in use" flag is set. If the tape is not at the load 
point, no action is taken. No input interface. On output, the label 
save area is set up. 



5.11.2 RFFARFFX (5 ,TAPFT0- I I ) 

As for RDLA3EL, except that no check is made to see if the tape is 

at the load point. This routine is used by the FILE-RESTORE 

processor OvBSL) , to read a label even though the tape may be positioned 

past the load point. May be used by user-programs, though the 

implications of doing so should be kept in mind. 



5-69 



5.11.3 WTLABEL ( 3 ,TAPETO- 1 1 1 ) 

May be called once by any processor to write a label on reel //l; no 
action is taken if the tape is not at load point. The label (if any) 
passed as an input parameter is written to the tape, with the current 
time and date, and reel number one, added. The label is also stored 
in the label save buffer. 



Input Interface: 

IS R Points one before the label data, which must be 
terminated by any standard system delimiter. The 
label cannot be greater than 16 characters; it will 
be truncated to 16 if it is. If a null label is 
submitted, no label is written to the tape, and 
the "unlabeled tapes in use" flag is set. 



Output Interface 

IS R Points to delimiter terminating label, or to 
16 bytes beyond the input position if none is 
found . 

Label save area initialized. 



5.11.4 WTLABELX (4 ,TAPhUO- 1 1 1 ) 



As for WTLABEL, except that no check is made to see if the tape is not 
set to load point. This routine is used by the FILE- SAVE processor 
(ABSD), to write a label at the current position of the tape. May be 
used by user-programs, though the implications of doing so should be 
kept in mind. 
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S.12 FUJI-INITIALIZATION 

5.12.1 DLINIT (6,DLOAD) 

Functional Description 

Obtains a block of contiguous overflow space for a file; links the 
frames and sets up initial conditions using the routine DLINIT1 
(described below) 

Lnput Interface 

MODULO T Contains the modulo required for the file. 

SEPAR T Contains the separation required for the file; if 
SEPAR is greater than 127, it will be reset to 
one . 



Output Interface 

BASE D Contains the beginning FID of a contiguous block 
of size MODULO*SEPAR. If BASE=0, the system does 
not have sufficient overflow space. 

Note: This subroutine automatically enters DLINIT1 if the overflow 
space is obtained. 



Subroutines Used 

GETBLK; two additional levels of subroutine linkage 



5.12.2 DL1NIT1 (7,DL0AD 



Functional Description 

Initializes link fields of a file as specified by its base, modulo 
and separation parameters; sets each group empty by adding an AM at 
the beg inn irg . 



Input Interlace 

nnT T I Contains base-FID, modulo and separation of 

[ file. 
SEPAR T 



} 
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Internal Usage 

CTR1 T 
RECORD D 

Output Interface 

R14 R As returned by subroutine LINK 
R15 R 

Subroutines Used 

LINK; RDREC ; two additional levels of linkage required. 

System Accessing Routines 

These subroutines may be used to setup pointers to system-files 
(SYSTEM, ACC), to the PIB's, etc. 

5.12.3 GPCBO (4,ABSL) 

Functional Description 

Returns the PCB-FTD for channel zero in the accumulator. 

Input Interfaces 
None 

Output Interfaces 

DO D Contains FID of PCB for channel zero.. High 
order 16 bits are zero. 

S.I 2.4 SETPTB (4, LOGON] 

Functional Description 

Sets up R14 to point to the first byte of the PIB associated with the 
process. No input interface. 
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Internal Usage 

SR5 S Scratch 

Output Interface 

R14 R As described. 

5.12.5 SETPIBF (3,ABSL) 

Functional Description 

Sets up R14 to point to the first byte of the PIB associated with 
channel zero. No input interface. 

Output Interface 

R14 R As described. 
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5.12.6 GMMBMS 



Functional Description 



Sets up pointers to the SYSTEM dictionary (formerly called MM/DICT) 
No Input Interlace. 



Output Interface 



BASE 


D 


MODULO 


T 


SEPAR 


T 



Contains base-FID, modulo and separation of 
SYSTEM dictionary. 



5.12.7 GACBMS (1 , LOGOFF) 

Functional Description 

Sets up pointers to the ACC dictionary. No Input Interface, 

Internal Usage 

SRI S Scratch 

T6 T Scratch 

All elements as used by GBMS 



Output Interface 

BASE 1 D 
MODULO T 
SEPAR J T 



REJ1 



Contains base-FID, modulo and separation of the 
ACC dictionary (actually a file, since ACC as 
defined in SYSTEM is a Q-entry t<« the DL/ID of 

ACCOUNT) 

Contains the value 331 if the ACC file is 
missing . 



Subroutines Called 



GMMBMS; GBMS; two additional levels of linkage required 
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5. 12 . 8 C.HTOPT ( 1 , SYSTEM- SUBS- 1 \) 

Functional Description 

This program converts an option string consisting of single alphabetic 
characters or a numeric specification. Alphabets set the corresponding 
bit (A sets ABIT, etc.). Multiple options are separated by commas, 
and the string must be terminated by a ")". ABIT through ZBIT are not 
zeroed on entry . 

Input Interface 



IS R Points one before the option string. 

Output Interlace 

ABIT through ZBIT Set as described above. 

NOBIT B Set if numeric option is found; 

zero otherwise. 

RMBIT B Set 

D4 D Contains numeric values if numeric options is 

found; unchanged otherwise. D4 contains 
first numeric, D5 second if found, otherwise 
the same value as DA. 

Error Conditions 



Exits to MD99 with error 209 after setting RMODE zero if a format error 
is encounterec. . 



5.12.9 GI-TUPD 



Functional Description 

Sets up the register triad UPDBEG,UPD and UPDEND, in unlinked format, 
to PCB+28. A convenient way to setup a register to a buffer (also 
used by RPG) . Note that the UPD registers are treated as a scratch 
register by some system subroutines. No Input Interface. 
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Output Interface 

UPBEG S Points to byte zero of PCB+28 

UPD R =UPDBEG 

UPDEND S Points to last byte of PCB+28. 

5.12.10 XI SOS 

Exchanges the register triads tSBEG/ IS/ISEND and OSBEG/OS/OSEND 

S . 1 2 . 1 1 PR I VTST 1 ( 5 ,SYSTLiM- SUBS - 1 1 I) 



Tests if the process has system privileges, level one; exits to ML 9 9 
with error 82 after setting RMODE zero, clearing PQFLG and LISTFLAG, 
and setting the history string null if not. 



5.12.12 PR 1 VTST 2 ( 7 , SYSThM-SUBS - II I) 
As above, for system privileges, level two. 
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5.13 MISn-LLANHOUS ROUTfNUS 



Some of these subroutines are primarily used by system processors, and, 
therefore may use elements other than the minimum set used by the 
general-purpose system subroutines. 



5.13.1 t::mdath, ttmf;, and dath 

Functional Description 

These routines obtain the system time and/or the system date, and 
store it in the buffer area specified by R15. The time is retarned 
as on a 24-nour clock. 

Entry Buffer Size Required Format 

TIME 8 HH:MM:SS 

DATE 11 DD MMM YYYY 

TIMDAT'E 21 HH:MM:SS DD MMM YYY 

Input Interface 

R15 R Points one prior to the buffer area. 

Output Interface 

R15 R Points to last byte of data stored. 

Subroutines Used 

Entry TIMDATE uses TJME; requires two additional levels of subroutine 
linkage; other entries require one level. 

Errors 

None 
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5.13.2 ASCII TO BINARY CONVERSION 

Functional Description 

The routines described below will convert a string of ASCII decimal or 
hexadecimal characters to their binary equivalent; the conversion 
continues until an illegal (non-decimal or non-hexadecimal) character 
is encountered . 

On entry, the appropriate register (see table) points either to a 
non-numeric character, one prior, or to the first character of the 
string, which must be a plus sign, a minus sign or an appropriate 
numeric (0-9 for the decimal routines, 0-9 and A-F for the hexadecimal 
routines). Cn return, the converted binary number is in the accumulator 
(and in some cases, in CTR1); the register points to the; illegal 
character causing the conversion to terminate. Note that the register 
will always be incremented by one even in the case of a null string 
(no legal characters). Arithmetic overflow due to too many digits in 
the character string cannot be detected. 

The routines CVDR15 and CVXR15 will test for a M + " , a "-", 
or an appropriate numeric character at R15 on entry; if 
none of these, R15 is incremented and the tests repeated. 
Thus, it is not necessary to call either of these two rou- 
tines with R15 pointing to a minus sign. 

Value Returned IN: 
Accumulator CTR1 

X 

X 

X X 

X X 

X X 

X X 

X X 

X X 

X X 

X X 



Subrout ine Used 

CVDR15 or CVXR15 are called by the other routines; one additional level 
of linkage is required. 



Entry 

Name 


Register 
Used 


Conversion From: 
Dec. Hex. 


CVDR15 


R15 




X 


CVXR15 


R15 




X 


CVTNIS 


IS 


(RA) 


X 


CVTH1S 


IS 


(R4) 


X 


CVTNOS 


OS 


(R5) 


X 


CVTHOS 


OS 


(R5) 


X 


CVTNiR 


TR 


(R6) 


X 


CVTHIR 


IR 


(R6) 


X 


CVTN1B 


IB 


(RIO) 


X 


CVTHIB 


IB 


(RIO) 


X 
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5.13.3 BINARY TO ASCII CONVERSION (MBPSUB AND MBDNSUB) 

Functional Description 

These routines will convert a binary number to the equivalent string 
of decimal ASCII characters. The conversion will store a minimum 
number of characters (that is, leading zeroes will be padded if needed) 
if the entry MBDNSUB is used; if MBDSUB is used, only as many 
characters as are needed to represent the number will be stored. A 
minus sign will precede the character string if the number to be 
converted is negative. 

These subroutines are implicitly called by the assembler instructions 
MBD (move binary to decimal) and MBDN. 

Input Interface 

DO D (Accumulator) Contains number to be converted. 

R15 R Points one prior to buffer where converted 

characters are to be stored (maximum 9 characters) 

T4 T (MBDNSUB entry only) Contains minimum number of 

characters to be stored. 

Output Interface 



R15 R Points to last converted charact 

Subroutines Used and Error Conditions: 
None . 



er 
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5.13.4 EBCDIC TO ASCII CONVERSION (ECONV, R.ETA.M, AND R.ATE.M) 
EBCDIC to ASCII conversion - ECQNV 

The register IB points to the EBCDIC character; a call to ECONV 
converts it to ASCII; characters that cannot be converted are returned 
as a question mark (?). 

String EBCDIC to ASCII with move - R.ETA.M 

The registers R15 and R8 point to the first character of the source 
and destination strings, respectively. CTR1 contains the character 
count. R13, R14, and TO are destroyed. All characters are converted. 
CTR1 should be zero on return. R15 and R8 point to the last 
character of their respective strings on return. 

String ASCII to EBCDIC with move - R.ATE.M 

Same as R.ETA.M except ASCII to EBCDIC translation. 



5-80 



5.13.5 CREAD 
Functional Description 

The subroutine either reads a card and returns the card reader status 
after the read or it just returns the status if it cannot read a card 
Cards are read in EBCDIC and are not converted by this routine. 



Input Interface 

R2 R Must point to a scratch byte. (Typically R2 

will always point to byte zero of the SCB . ) 

OBBEG S Points anywhere within the frame that the card 

is to be read into. (Typically OBBEG will always 
point within PCB+4). 



Internal Usage 

T3 T Used as a counter for status timeout after a read 



Output Interface 

R2 R Unchanged. The byte that R2 points to contains 
the status of the card reader. 

CBIT B Zero if no card was read. Set if an attempt to 
read a card was made. 

R15 R Points to first byte of card read, 80 bytes from 
the end of the frame that OBBEG points to. 



Errors 

None, except card reader errors returned as status. The status bits 
are as follows*. 

Bit Explanation of the set condition. 

0-2 Unused by the controller. Will be zero. 

3 Card reader mechanical error (e.g., pick failure, 
card motion error, etc.) 

4 EBCDIC error detected. (e.g., an invalid punch 
combination was detected.) Not an error if CBtT is 
zero. 
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5 Input hopper empty. Not an error if CBIT is set. 

6 This bit is always zeroed by the routine. It is only 
used for byte I/O. 

7 Card reader ready. 

3,5,7 If bits 3, 5, and 7 are all set, this indicates that 
power is off on the card reader. 
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5.13.6 SORT 

Functional Description 

Sorts an arbitraril) long string of keys in ascending sequence only; 
the calling program must complement the keys if a descending sort is 
required. The keys are separated by SM's when presented to SORT; they 
are returned separated by SB's. Any character, including system 
delimiters other than the SM and SB may be present within the keys. 

An n-way polyphase sort-merge sorting algorithm is used. The original 
unsorted key string may "grow" by a factor of 10%; and a separate buffer 
is required for the sorted key string, which is about the same length 
as the unsorted key string. The "growth" space is contiguous to the 
end of the original key string; the second buffer may be specified 
anywhere. The SORT subroutine will automatically obtain additional 
overflow space and link it if needed. 

Due to this, one can follow standard system convention and build the 
entire unsorted string in an overflow table with OVRFLCTR containing 
the beginning FID; the setup is then: 

beginning of end of "growth" beginning of 
unsorted keys unsorted keys t space j second buffer 
I _ w \N | - | - V 



The second buffer pointer then is merely set at the end of the 
"growth" space, and SORT allowed to obtain additional space as 
required . 

Alternately , the entire set of buffers may be in the IS or OS work- 
space if they are large enough. 



Input Interface 

SRI S Points to SM preceeding first key. 

SR2 S Points to SM terminating last key. 

SR3 S Points to beginning of second buffer area, 

Internal Usage 

Entire BMS work area. 

SI through S9: Scratch 
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BMS 


R 


CS 


R 


IS 


R 


OS 


R 


TS 


R 


HBIT 


B 


LBIT 


B 


SB1 


B 



Output Interface; 

SRI S Points two bytes before SB preceding first 

sorted key. The sorted keys are delimited by 
SB's, and the entire string terminated by an 
SM. 



Subroutine Usage 

Internal call to COMP ; ATTOVF if end of second buffer is reached. 
One additional level of linkage required. 
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5.13.7 BLOCK-LETTERS 
Functional Description 

This program provides the block letter capability. In addition to 
its use at the verb level, it may be called as a subroutine 
(DEFM 2,2901. It will format a string of words on the ter- 
minal or the nrinter and return to the caller. 



Input Interface 



ZBIT If set, direct output to the terminal; if not set, 

direct output to the printer 

IS Points one character prior to the first character to 

be output; end of data is indicated by the character 
pair SM,Z, if a segment mark is present in the 
string not: followed by a "Z" the string must be 
terminated by a start buffer (SB) X ' FB ' (see 
TCL-I interface) . 

PAGSIZE Maximum number of lines per page. 

OBSIZE Maximum number of characters on each output line. 

Internal Usage 

The following functional elements are used and not restored. 

SC2, SCL REJCTR, Cl , PAGINATE, BASE, MODULO, SEPAR, 
CTR16, CTR17, CTR18, SR4, SRS, SR6, SR7, SR8, SR9, <^10, 
SR11, SR12, SR13, SRI 4, SR15, SR16, SR17, SR18, SR19, 
SR20, SR21, SR22, AFEND, LPBIT, ZBIT 

Subroutines Called: 



RETIX, GBMS, NEWPAGE, CVTNIR, WRTLIN 



Error Conditions 



If a BLOCK-TERM or BLOCK-PRINT error is detected, the program exits "to 
WRAPUP without resetting RMODE or VOBIT. See verb write-up On 
BLOCK-TERM and RLOCK-PRINT in Reality Programmer's Reference 
Manual . 
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5.14 ENGLISH AND BATCH INTERFACES 

5.14.1 ENGLISH INTERFACE 

It is possiole to interface with the ENGLISH processor at several 
levels. A typical LIST on SORT statement passes through the Pre- 
processor and Selection Processor before entering the LIST processor. 
All statements must pass through the first two stages; but control 
can be transferred to user-programs from that point onward. 

5.14.2 GENERAL CONVENTIONS 

The ENGLISH processors use a compiled string that is stored in the 
IS work-space. String elements are separated by segment marks; there 
is one element for each attribute specified in the original statement; 
one file-defining element, and special elements pertaining to selection 
criteria, sort-keys, etc. 

Formats : 



File-Defining Element ; at ISBEG+1 

(SM)D file-name (AM) base (VM) modulo (VM) separ (AM) conv. (AM) correl 
(AM) type (AM) just. (AM) (SM) . 



Attribute-Defining Element 

(SM) c attribute-name (AM) amc (AM) conv. (AM) correl. (AM) type (AM) 
just. (AM) (SM) 



c = A - regular or D2 attribute. 

Q - Dl attribute. 

BX - SORT-BY, SORT-BY-DSND, etc. "X" is from attribute one 
of the connective. 

End-of-String Element 
(SM)Z 

Exp licit I tern- id's 

(SM)I item-id (SM) 

5.14.3 Till: SELECTION PROCESSOR 

This performs the actual retrieval of items which pass the selection 
criteria, if specified. Every time' an item is retrieved, the processor 
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m. 



at the next level is entered with t'MBIT set; a final entry with RMBIT 
zero is also made after all items have been retrieved. If a sorted 
retrieval is required, the Selection processor passes items to the 
GOSORT mode, which builds up the sort-keys preparatory to sorting the 
After sorting, GOSORT then retrieves the items again, in the requested 
sorted sequence. 

A user-program may get control directly from the selection processor 
(or GOSORT if a sorted retrieval is required); the formats of the 
verbs are: 

Line Number Non-Sorted Sorted 

001 PA PA 

002 35 35 

003 xxxx 7 6 

004 xxxx 

where "xxxx" represents the mode-id of the user-program. Note that, 
in this method of interface, only item retrieval has taken place; 
none of the conversion and correlative processing has been done. For 
functional element interface, the column headed "Selection Processor" 
in the table shown later must be used. 

Exit convention: On all but the last entry, exit indirectly via RHODE 
(using ENT* RHODE); on the last entry, exit to one of the VJRAPUP entry 
points. Processing may be aborted at any time by setting RHODE zero 
and entering WRAPUP. SB0 must be set on first entry. 



5.14.4 SPECIAL EXIT FROM THE LIST PROCESSOR 

A user-program may also gain control in the place of the normal LIST 
formatter, to perform special formatting. The advantage here is that 
all conversions, correlatives, etc. have been processed, and the 
resultant output data has been stored in the history string (HS area) 
The formats of the verbs that are: 

Line Number Non-Sorted Sorted 



001 PA PA 

002 35 35 

003 4D 4E 

004 xxxx xx: 
Where "xxxx" is the mode-id of the user-program. 
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History-String Format: The output data is stored in HS area; data from 
each attribute specified is stored in the string, delimited by AM ' s ; 
multiple values and sub-multiple values are delimited within by VM's 
and SVM's respectively. Since the HS may contain data other than the 
retrieved item, the user-program should scan from HSBEG, looking for a 
segment preceded by an "X"; all segments except the first are 
preceded by an SM. 

X item-id (AM) value one (AM) . . . (AM) value n(AM)(SM)Z 



The program must reset the history string pointer HSEND, as items are 
taken out of the string. In special cases, data may not be used till, 
say, four i:ems are retrieved, in which case HSEND is reset on every 
fourth entry only. HSEND must be reset to point one byte before the 
next available spot in the HS; normally one before the first "X" code 
found. 

Exit convention: see preceding section. 

Example: The following program is an example of one which 
prints item id's (only) f our-at-a-t ime across the page. 



001 




FRAME 


504 


002 




ZB 


SB30 


003 




BBS 


SB0,NOTF 


004 


» FIRST 


TIME SETUP 


005 




MOV 


4,CTR32 


006 




SB 


SB0 


007 


i' 






008 


NOTF 


BBZ 


RMBIT,PRINTIT 


009 




BDNZ 


CTR32, RETURN 


010 




MOV 


4,CTR32 


011 


PR I NT IT 


MOV 


HSBEG, R14 


012 


LOOP 


INC 


R14 


013 




BCE 


C'X' ,R14, STORE IT 


014 




BCE 


C'Z',R14,ENDHS 


015 


SCANSM 


SCD 


R14,X'C0' 


016 




B 


LOOP 


017 


STORE IT 


BBS 


SB30,COPYIT 


018 




SB 


SB30 


019 




MOV 


R14,SR28 


020 


COPY IT 


MI ID 


R14,OB,X'A0' 


021 




MCC 


C ',OB 


022 




INC 


OB, 5 


023 




B 


SCANSM 


024 


ENDHG 


BSL 


WRTLIN 


025 




MOV 


SR28, HSEND 


026 




DEC 


HSEND 


027 




BBZ 


RMBIT,QUIT 


028 


RETURN 


ENT- 


RMODE 


029 


QUIT 


ENT 


MD999 


030 




END 





INTERNAL FLAG 
INTERNAL FLAG 
NOT FIRST TIME 



LAST ENTRY 

NOT YET 4 ITEMS OBTAINED 

RESET 



FOUND AN ITEM 
END OF HS STRING 
SCAN TO NEXT (SM) 

NO FIRST ID FOUND 
FLAG FIRST ID FOUND 
SAVE LOCATION OF FIRST 
COPY ITEM- ID TO OB 
OVERWRITE (AM) 
INDEX 



PRINT A LINE 
RESTORE HSEND TO 
BACKUP ONE BYTE 



FIRST M X" CODE 



RETURN TO SELECTION PROCESSOR 
TERMINATE PROCESSING 



5.14.5 FUNCTIONAL ELEMENT USAGE 

The following table summarizes the functional element usage by the 
Selection and LIST processors. Only the most important usage is 
described; elements that have various usages are labeled "scratch". 
A " " indicates that the processor does not use the element. Since 
the LIST processor is called by the Selection processor, any element 
used for "memory" purposes (not to be used by others) in the former 
is indicated by a blank usage in the latter column. 



In general, user-programs may freely use the following elements: 



Bits 

Tallys 

S/R's 



SB20 upwards 

CRT30 upwards ; D3-D8 

SR20 upwards 



SBO and SB1 have a special connotation; they are zeroed by the 
Selection processor when it is first entered, and not altered there- 
after. They are conventionally used as first-time switches for the 
next two levels of processing. SBO is set by the LIST processor when 
it is first entered, and user-programs that gain control directly from 
Selection should do the same. SBO may be used as a first-entry switch 
by user-programs that gain control from the LIST processor. 

An ENGLISH verb is considered an "update" type of verb of the SCP 
character (from line one of the verb definition) is A, B, C, D, E, G, 
H, I or J. SCP characters of B, C, D and E are reserved for future 
ENGLISH update verbs. 



BITS 

ABIT 
BBIT 
CBIT 
DBIT 
EBIT 
FBIT 
GBIT 
HBIT 
IBIT 
JBIT 
KBIT 
LBIT 
MBIT 
NBIT 
OBIT 
PBIT 
QBIT 
RBIT 
SBIT 
TBIT 



Selection Processor 

unused 

first entry flag 

scratch 

scratch 

reserved 

reserved 

reserved 

reserved 

explicit item-ids specified 

reserved 

scratch 

scratch 

conversion interface; zero 

scratch 

selection test on item-id 

scratch 

scratch 

full-file retrieval flag 

selection on values (WITH) 

scratch 



LIST Processor 

non-columnar list 

scratch 

dummy control-break 

control-break flag 

scratch 

scratch 

scratch 

D2 attribute in process 

scratch 

left-justified field 

zero 

scratch 

scratch 
scratch 



print limiter flag 
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BITS 



SeLection Processor 



LIST Processor 



UBIT 
VBIT 
WBIT 
XBIT 
YBIT 

ZBIT 
SBO 

SB1 

SB2 
SB4 

through 
SB16 



scratch 

reserved 

scratch 

scratch 

left-justified value beinj 

tested 

left-justified item-id 

Unavailable 

Unavailable 

reserved; zero 
scratch or reserved 



reserved 

scratch 

reserved 

reserved 

left-justified 

print-limiter test 

first entry flag, 
level one 
first entry flag, 
level two 

scratch or reserved 



VOBIT 



set for WRAPUP interface 



COLHDRSUPP 

DBLSPC 

HDRSUPP 

i'DSUPP 

LPBIT 

CBBIT 

PAGINATE 



set if corresponding connective 
was found in input statement 



RMB IT 



set on exit it an item was 
retrieved; zero on final 
exit. 



SMBIT 
GMBIT 
BKBIT 



FUNC interface 
FUNG interface 
scratch 



FUNC interface 
FUNC interface 
scratch 



DAF1 



DAF8 



set if SCP = B,C,D,E,G, 

H, I or J 

set if accessing a dictionary 



Tallys 



Selection Processor 



C1;C3-C9 


Scratch 


C2 


contents of M0DEID2 


CTR1-CTR4 


Scratch 


CTR5 


Scratch 


CTR6 


reserved 


CTR7 


reserved 


CTR8 


reserved 


CTR9 


reserved 


CTR10 


reserved 



LIST Processor 

Scratch 

Scratch 

AMC of current element 

in IS 

Scratch 

AMC corresponding to IR 

Scratch 

Scratch 

Scratch 
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Tallys 



Selection Processor 



LIST Processor 



CTR11 
CTR12 
CTR13 
CTR14 
CTR15 
CTR16 
CTR17 
CTR18 
CTR19 
CTR20 
CTR2I 
CTR22 
CTR23 
CTR24 
CTR25 
CTR26 
CTR27 
CTR28 

D9 

FP1-FP3,D7 

RMODE 

SIZE 

SBASE 

SMOD 

SSEP 

DBASE 

DMOD 

DSEP 



reserved 

FUNC interface 

FUNC interface 

reserved 

reserved 

reserved 

reserved 

reserved 

reserved 

CONV interface 

CONV interface 

CONV interface 

CONV interface 

reserved 

reserved 

reserved 

reserved 

reserved 

count of retrieved items 

FUNC interface 

return mode-id (MD30) 

item-size 

b,m,s of file 



b,m,s of dictionary 



Scratch 

current-sub-value count 

current value count 

Scratch 

Scratch 

Contents of item count file 

reserved 

Scratch 

Scratch 

CONV interface 

CONV interface 

CONV interface 

CONV interface 

Scratch 

Scratch 

Scratch 

current max-length 

Scratch 



FUNC interface 



Scratch 



S/R's 

SI 

S2-S9 

SRO 

SRI 
SR2 
SR3 
SR4 
SR5 
SR6 
SR7 



Selection Processor 

Points to next explicit 

it em- id 

Scratch 

Points one before count 

field of item 

Points to correlative field 

Scratch 

reserved 

Points to last AM of item 

reserved 

Points to conversion field 

reserved 



LIST Processor 



Scratch 



Current correlative field 

Scratch 

Scratch 

Next segment in IS 
Current conversion field 
Scratch 
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S/R's 



Selection Processor 



LIST Processor 



SR8 


reserved 












reserved 


SR9 


reserved 












reserved 


SR10 


reserved 












Scratch 


SR11 


reserved 












reservec 


SR12 


reserved 












reserved 


SRI 3 


COSORT only: 


next 


sort- 


-key 


reserved 


SR14 


reserved 












reserved 


SRI 5 


reserved 












reserved 


SRI 6 


reserved 












reserved 


SRI 7 


reserved 












reserved 


SRI .8 


reserved 












reserved 


SR19 


reserved 












reserved 


PAGHEAD 


Heading 


in HS 


if 


HEADING 


generated head 




was spec 


i f i ed 










Workspace 


See sect ion 


on 


work- 






pointers 


space us. 


age 













A/R' s 

AF 

BMS 

CS 

IB 

OB 

IS 

OS 

TS 

UPD 

IR 



Selection Processor 



Sc ra ten 

within BMS area 



compiled string 
within TS area 
within item 



LIST Processor 

Scratch 

Scratch 

Scratch 

Scratch 

Output data line 

compiled string 

Scratch 

within TS area 

within HS area 

within item 



Work- 

Uss 


•Space 

ige 


Selection Processor 


AF 




Scratch 


BMS 




Contains item-id 


CS 






IB 






OB 






IS 




Compiled string 


OS 







LIST Processor 



Output line, 



Scratch 
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Work-Space 
Usage 


Selection Processor 


HS 
TS 


Heading data 
Scratch 



LIST Processor 



Heading data, attribute 
data for special exits. 
Current value in 
process. 



Additional Notes 

1. If a full-file retrieval is specified, the additional internal 
elements as used by GETITM will be used. If explicit: item-id's 
are specified, RETIX is used for retrieval of each item. 

2. Elements as used by the FUNC and CONV processors have been 
shovm in the table; both may be called either by the Selection 
processor or the LIST processor. 

3. Since the I STAT and SUM/STAT processors are independently driven 
by the Selection processor, the element usage of these processors 
are not shown. 

4. The section of the IS and OS used by the Selection and LIST 
processors is delimited by ISEND and OSEND respectively. The 
buffer space beyond t-hese pointers is available for use by 
other programs. 



5.14.6 BATCH PROCESSOR INTERFACE 

The BATCH processor uses a BATCH- string which defines the method of 
updating one or- more items in one or more files using a single line 
of input data. The updated item(s) is (are) built as disc-update 
string(s) in the history string area (see WRAPUP for format). 

A user-exit can be defined in the BATCH-string ; the functional 
elements used by BATCH are described in the following tables; the 
column headed 'Level" has the following entries: 

- Element is used in the described fashion throughout 
the BATCH processing. 

F - Element is redefined every time a file-defining 
element is found. 

A - The element is redefined for every attribute. 

blank - Scratch element, on reserved for future usage. 

As far as user- exit programs are concerned, therefore, all elements 
defined at the "A" level can also be considered scratch. 
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Exit Convention: The user-exit must return to the BATCH processor by 
executing the external transfer to the mode BATCH5 (DEFM 0,84). 



Bits 



Level 



ABIT 





BBIT 




CBIT 




DBIT 


A 


EBIT 


F 


FBIT 





GBIT 




HBIT 


A 


IBIT 





JBIT 




KBIT 


F 


LBIT 


F 


MBIT 


A 


NBIT 




OBIT 




PBIT 


F 


OBIT 




RBIT 




SBIT 




TBIT 




UBTT 





VBIT 




WBIT 




XBIT 




YB1T 





ZB1T 




SB1 




through 




SB9 





Description 

First-time switch for BATCH process. 

reserved 

Scratch 

D2 attribute in process. 

Updates to be merged with item on file. 

Set when a BV or BC Arb-element is found. 

reserved 

Dl attribute in process. 

Set wben a "secondary" file. 

reserved 

Item to be verified as existing on file. 

Item to be verified as not existing on file. 

Set; CONV interface. 

reserved 

reserved 

Flag indicating that a multi-valued field 

referenced by BC/BV element. 

reserved 

reserved 

scratch 

scratch 

Item is being deleted (X element in file-definition) 

s cratch 

scratch 

reserved 

Primary item being deleted. 

scratch 

scratch 



DAF10 



Set if SELECT/SSELECT is driving BATCH. 
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Tallys 



Level 



Descript:i on 



CI 
C2 
C3-C9 



scratch 
scratch 
reserved 



CTR1 

CTR2 

CTR3 

CTR4 

CTR5 

CTR6 

CTR7 

CTR8 

CTR9 

CTR10 

CTR11 

CTR12 

CTR13 

CTR14-CTR19 

FP1-FP3 

BASE 

MODULO 

SEPAR 

SBASE 

SMOD 

SSEP 

D7 

D9 



scratch 

scratch 

scratch 

D1-D2 set number (follows Dl or D2 element) 

reserved 

reserved 

scratch 

Current amc in process. 

reserved 

reserved 

Value no. of "Dl;l" attribute; 

if unspecified. 

Value no. of "Dl;2" attribute; 

if unspecified. 

Value no. of "Dl;3" attribute; 

of unspecified. 

reserved 

scratch 

scratch 
scratch 
scratch 
scratch 
scratch 
scratch 
scratch 



RMODE 



Return mode- id for WRAPUP 
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Work-Spaces 

& A/R's Level Description 

BMS A Work-space contains current value 

CS Scratch; work-space reserved. 

AF Unused 

IB Input data line 

OB Unused 

TS Used for reading input lines. 

IS Contains BATCH string; IS points to AM 

before next element. 

OS Scratch work-space. 

UPD Points to history-string 

S/R's Level Description 



S1-S9 Scratch 



SRO 





SRI 





SR2 




SR3 




SR4 


F 


SR5 




SR6 




SR7 





SR8 




SR9 


A 


SR10 


F 


SR11 





SR12 





SR13 




SR14 


F 


SR15 


F 


SR16-SR19 





One before count field of primary item on file. 

End of primary item on file 

scratch 

reserved 

End of current item on file. 

reserved 

reserved 

End of OS deletion table 

reserved 

Last byte of value in BMS area. 

End of primary update string if FBIT set. 

Points one before "DU" of history string 

for primary item update. 

reserved 

Location of file-defining element in IS 

Location of IB when current file-defining 

element was found. 

reserved . 
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Characters Level Description 



SCP 





SCO 





SCI 





SC2 






Contains a "D" for B/DEL; "A" for B/ADD 

Contains a blank. 

Scratch 

Contains a comma. 



Also note elements used by CONV processor. 
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CONVERSION PROCESSOR INTERFACE 



The Conversion processor is called as a subroutine (CONV DEFM 0, 90) 
and may be used to perform the Translate, Date, or Mask Conversions. 
More than one conversion can be performed at once if the conversion 
string is set up to do so; multiple conversion codes are separated by 
VM's. Conversion is called by the ENGLISH pre-processor to perform 
conversions on "input" data (in selection criteria), and by the LIST/ 
SORT processor to perform "output" conversion. 



Input Interface 



MBIT 



TSBEG S 



IS 



BMSBEG 



Set if an "input" conversion is to be performed; 
zero for an "output" conversion. 

Points one before the value to be converted; the 
value is converted "in place", and the buffer is 
used for scratch spare; therefore it must be 
large enough to contain the converted value. The 
value to be converted is terminated by any of the 
standard system delimiters; SM, AM, VM, SVM. 

Points to the first character of the conversion 
code specification string; the code(s) must be 
terminated by an AM. 

Used for item-id copy on Translate conversions. 



Internal Usage 



SB10 


SB11 


SB12 



SC2 



CTR20 


T 


CTR21 


T 


CTR22 


T 


CTR23 


T 
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S4 


S 


S5 


S 


S6 


S 


S7 


s 



Scratch; use J to save and restore various elements 



Output Interface 

IS R Points to AM terminating the conversion code(s). 

TSBEG S Points one before converted value. 

TS R Points to the last character of the converted 
TSEND S value; a SM is also placed one past the value. 
If a null value is returned,, TS=TSEND=TSBEG. 

If a Translate conversion is used, subroutines GBMS, GDLID, and RETIX 
are used. Thus all elements used by those subroutines will be 
destroyed, with the exception of IR, SR4 and SIZE, which are restored 
before exit to their values or entry. 



Subroutines Used: GBMS, GDLID, RETIX (T-conversion only); MBDSUB, 
CVDR15 



Error Exits 



CONV will exit to WRAPUP after setting RMODE zero under the following 
conditions : 

705 Illegal conversion code 

706 Illegal T-conversion: format incorrect, filename 
cannot be found, etc. 

707 DL/ID cannot be found for T-conversion file. 

WRAPUP is also entered, without setting RMODE zero, under the following 
error conditions: 

708 Value cannot be converted by the T-conversion. 
339 Invalid format for input data conversion. 



5.14.8 USER CONVERSION PROCESSING 

The Conversion Processor will pass control to a user-written routine if 
a "Uxxxx" code is found in the conversion string, where "xxxx" is the 
hexadecimal mode- ID of the user-routine. This routine can then perform 
special conversion before returning. The input interface at the user- 
routine will be; identical to that described in the preceding section; 
after performing the conversion the user-routine should setup the 
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output interface elements fsec ENGLISH manual), and exit via an 
external branch to 1,C0NV, which will continue the conversion process 
if multiple conversions are specified; a RTN may be executed if this is 
not needed, or to prevent further conversions being performed. Eiements 
used by the regular conversion processors may be safely used by user- 
routines; however, if additional elements are needed, a complete know- 
ledge of the processor that called CONVERSION (LIST, SELECTION, etc.) 
will be necessary. 



5.14.9 FUNCTION PROCESSOR INTERFACE 

The FUNCTION processor is used by the ENGLISH LIST/SORT processors to 
compute values which have an "F" correlative specified. It may also 
be called, as a subroutine, by user routines. Each call to FUNC 
(DEFM 0,101) returns one value. 



Input Interface 

SRI S Points to the "F" of the Function string. 

SRO S Points one before the count-field of the item. 

SRA S Points to the last AM of the item. 

CTR13 T Contains the "value number" currently being 
processed (one on initial entry). 

CTR12 T Contains the "sub-value number" (D2 sub-value) 
currently being processed. 

TSBEG S Points to a buffer area-350 where the value is to 
be stored on exit. 

Internal Usage 



SMBIT 
GMBIT 


B 
B 


CTRl 
CTRl 2 
CTR20 
CTR21 


T 
T 
T 
T 


IR 
IS 


R 
R 



D7 D 
FP1-FP3 I) 



5-99 



Output Interface 

IR R Points one before the value copied (TSBEG+350) ; the 
value is delimited by an AM if none of the 
referenced fields contained multiple or sub- 
multiple values; by a VM if at least one of the 
referenced fields contained a VM on this entry 
by A SVM if at least one of the referenced fields 
contained a SVM on this entry. 

R15 R Points to a blank following the terminal delimiter 
of the value. 

IS R Points to the AM or one past a VM, terminating the 
Function string. 

D0,FP1 D Contains final computed result. 

Programming Note 

On the first call to FUNC, CTR12 and CTR13 are both set to one; when 
FUNC returns a value, the terminal delimiter determines what action to 
take or subsequent calls — a VM indicates increment of CTR13 before the 
next call; a SVM indicates increment of CTR12; an AM indicates end of 

processing : 



SET VALUE NUMBER TO ONE 
SET SUB- VALUE NUMBER TO ONE 





ONE 


CTR13 


FC1 


ONE 


CTR12 


FC2 


BSL 


FUNC 



store value from IR 



DEC R15 

BCE AM,R15,END END OF PROCESSING 

INC CTR12 INCREMENT SUB-VALUE COUNT 

BCE SVN,R15,FC2 GET NEXT SUB-VALUE 

INC CTR13 INCREMENT VALUE COUNT 

B FC1 GET NEXT VALUE; RESET SUB-VALUE COUNT 

END EQU * CONTINUE 
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S. 1-1.10 SPECIAL IJ-CORRELATIVE EXIT 

Format: 'U508E' 

This may be used in a dictionary attribute to generate an output listing via 
the ENGLISH LIST or SORT statements that is identical in format to the COPY , . 
(T) output. This is mainly useful to list BASIC programs and other textual 
data in the COPY format, but where the ENGLISH feature such as pagination, 
headings, selection, etc. are to be used. 

Example: 

The dictionary of the BP (Basic Programs) file contains an attribute 
'UCOPY': 





UCOPY 


001 


A 


002 




003 




00i+ 




005 




006 




007 




008 


U508E 


009 


R 


010 


1 



A formatted listing of items in the BP file can be generated by the statement: 
:LI5T BP UCOPY 'PKOGl' ■* PROGS 1 ID-SUPP CCC~HDR~SUPP< 
: HEADING"BASI C PROGRAMS / ] * tPTR 



The "ID-SUPP" is needed to prevent the item-id being duplicated on the output; 
the "COL-HDR-SUPP" suppresses the normal ENGLISH time/date heading and the 
attribute heading. 



Notes: 



1. Line numbers will appear on the output If the attribute with the 
U-correlative is right-justified (as in the example above); by using 
an "L" in line 9 of the attribute, line numbers will be suppressed. 

2. The attribute with the "U508E" correlative should be the only 
attribute specified. 
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